correctly infer return type of functions
[sqlgg.git] / make_version.ml
blobb442b9fdd7bd64ce5b597ea83626b1a4215cb091
1 (* $Id$ *)
3 let _ =
4 let str = input_line stdin in
5 print_endline ("let revision=\"" ^ str ^ "\"");
6 print_endline "let version=\"0.1\""