read_int avec ocaml

[gilou71]

Bonjour,

j'utilise ocaml sous windows et quand j'écris

Code :

#let a = read_int();;

puis entrée puis le nb puis entrée il ne se passe rien, est ce que quelqu'un a déjà eu ce problème et aurais une réponse?

[gorgonite]

bizarre, ça ne le fait pas sous la version unix

Code :

1
2
3
4
# let a = read_int ();; 
2
val a : int = 2
#

[Garulfo]

et sous Mac aussi

Code :

1
2
3
4
5
        Objective Caml version 3.09.3
# let a = read_int ();; 
2
val a : int = 2
#

Le problème vient probablement d'ailleurs — genre 12 pouces devant l'écran

[LLB]

Tu testes dans quel logiciel ? Il attend peut-être ";;" avant d'envoyer la valeur au mode interactif ? (il me semble que le mode tuareg le fait)

[james-mi]

Envoyé par LLB

Tu testes dans quel logiciel ? Il attend peut-être ";;" avant d'envoyer la valeur au mode interactif ? (il me semble que le mode tuareg le fait)

Je viens d'essayer avec emacs + tuareg (linux) que je ne maîtrise pas encore totalement, dans le toplevel :

Code :

let a = read_int();;

le toplevel attend une valeur, je tape 2 puis "entrée", emacs rajoute ";;" et la fonction read_int plante avec

Code :

Failure : "int_of_string"

euh... on fait comment dans ce cas ....

[LLB]

Je viens d'essayer avec le mode tuareg, ça marche si on entre la valeur dans le "caml-toplevel". Les points-virgules ne sont ajoutés qu'avec les fonctions de type tuareg-eval- (C-c C-e et les autres).

En général, je préfère passer les valeurs en argument aux fonctions, plutôt que de faire un read_. Je trouve ça plus pratique avec le mode interactif.

[gilou71]

Je crois que c'est un problème qui concerne la boucle interactive sous windows,c'est quand même vachement handicapant de ne pas pouvoir faire une entée sortie, ça ne marche pas non plus avec les ;; apres le nb,alors...

[gilou71]

pardon c'est quoi le mode tuareg et le caml-toplevel?Merci d'avance...

[SpiceGuid]

@gilou

La lecture en entrée ne fonctionne pas dans l'interface OCamlWin(Plus).
Tu dois ouvrir un CMD.EXE puis lancer ocaml et là ça fonctionne:

Code :

1
2
3
4
5
6
7
>ocaml
        Objective Caml version 3.09.3

# let a = read_int();;
2
val a : int = 2
#

@james-mi

Ben pareil, avec rxvt au lieu de cmd.exe.

Envoyé par LLB

En général, je préfère passer les valeurs en argument aux fonctions, plutôt que de faire un read_. Je trouve ça plus pratique avec le mode interactif.

C'est la voie de la sagesse.

[gilou71]

Merci beaucoup Spiceguid, ça fonctionne...

[james-mi]

Envoyé par LLB

Je viens d'essayer avec le mode tuareg, ça marche si on entre la valeur dans le "caml-toplevel". Les points-virgules ne sont ajoutés qu'avec les fonctions de type tuareg-eval- (C-c C-e et les autres).

chez moi c'est activé d'office. Y a-t-il un moyen de le désactiver? pour éviter les ";;" après l'entier, qui me conduisent à un "Exception: Failure "int_of_string" ?

Envoyé par LLB

En général, je préfère passer les valeurs en argument aux fonctions, plutôt que de faire un read_. Je trouve ça plus pratique avec le mode interactif.

moi aussi, mais ça peut être utile à l'occasion, et je n'arrive pas à le faire fonctionner ...
@spiceguid : je ne connais pas rxvt, j'utilise parfois ocaml dans le terminal gnome - read_int() n'y pose pas de pb.

[Fractal LLG]

Bonjour

J'ai déjà eu le même problème (rajout des ;; sous Emacs ce qui fait planter read_int) et pour le contourner j'ai trouvé la parade suivante (c'est un peu beaucoup du bricolage), j'ai rajouté au début de mon programme le code

Code :

1
2
let read_int () = (* Nouvelle fonction read_int pour régler les problèmes de compatibilité avec Emacs *)
  let str = read_line() in int_of_string (if str.[(String.length str) - 1] = ';' then String.sub str 0 (String.length str - 2) else str)

qui se charge de redéfinir la fonction read_int en enlevant les éventuels points-virgules à la fin du nombre entré par l'utilisateur.
C'est pas super joli, mais ça marche

Fractal

[james-mi]

merci pour l'astuce...s'il n'y a rien de mieux c'est ce que je vais faire ...

[LLB]

Envoyé par james-mi

chez moi c'est activé d'office. Y a-t-il un moyen de le désactiver? pour éviter les ";;" après l'entier, qui me conduisent à un "Exception: Failure "int_of_string" ?

Je viens de regarder le code Lisp. Il suffit d'appeler la fonction comint-send input pour envoyer l'entrée au mode interactif, sans attendre ";;". Par chance, il y a déjà un raccourci pour cette fonction : il s'agit de M-entrée.

[jawal78]

Envoyé par LLB

Je viens de regarder le code Lisp. Il suffit d'appeler la fonction comint-send input pour envoyer l'entrée au mode interactif, sans attendre ";;". Par chance, il y a déjà un raccourci pour cette fonction : il s'agit de M-entrée.

[vtrone]

Sous Windows, en utilisant OcamlWinPlus, j'ai le même problème que toi.

Par contre, pas en utilisant le toplevel ocaml. Ouvre une invite de commandes, tape

Code :

C:\>ocaml

Puis ressaisi ta ligne

Code :

# let a = read_int();;

Ton nombre

Code :

2

Et ça fonctionnera.

Code :

1
2
3
4
5
6
        Objective Caml version 3.11.0

# let a = read_int();;
2
val a : int = 2
#

[tchioprof]

J'ai affecté la commande comint-send-input à une touche (f10 par exemple)
Dans le fichier d'initialisation de Emacs ( le mien est .emacs.d/init.el) j'ai écrit :
(global-set_key [f10] 'comint-send-input) puis sauvé le fichier (C-x C-s)
J'utilise la touche f10 au lieu de <RET>.
Voir le lien http://www.gnu.org/software/emacs/ma...Init-Rebinding
Remarque : dans Emacs read_int() marche dans inferior-caml mais pas dans caml-toplevel.
Elle marche aussi dans un terminal mais pas dans la boucle d'interaction de ocaml (sous Windows).