More coverage, based on unresolved symbols in inkscape and pidgen.
[fedora-mingw.git] / ocaml / test_float.ml
1 (* Float test, part of calendar test which was failing. *)
2
3 open Printf
4
5 let x = 1 * 3600 + 2 * 60 + 3 ;;
6
7 printf "minutes = %g\n" (float x /. 60.) ;;
8
9 printf "minutes (immediate) = 62.05 is %b\n" ((float x /. 60.) = 62.05) ;;
10
11 let m = float x /. 60. ;;
12
13 printf "minutes (variable) = 62.05 is %b\n" (m = 62.05) ;;
14