Edit : c'est bon, j'ai trouvé tout seul le problème.

j'ai voulu m'initier au côté objet d'ocaml, seulement, sur un code basique, je me retrouve avec une syntax error :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
class point (x_init,y_init) =
	object
		val mutable x = x_init
		val mutable y = y_init
		method get_x = x
		method get_y = y
		method moveto (a,b) = x <- a ; y <- b
		method rmoveto (dx,dy) = x <- x + dx ; y <- y + dy
		method to_string () =
			"( " ^ (string_of_int x) ^ ", " ^ (string_of_int y) ^ ")"
		method distance () = sqrt (float(x*x + y*y))
	end
 
let main () =
	let p1 = new point(1,2);
	print_endline ""
 
let _ =
	main ()
File "main.ml", line 19, characters 0-3:
Error: Syntax error

la ligne 19 est la ligne du let _ =