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


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