diff options
Diffstat (limited to 'ia32/TargetPrinter.ml')
-rw-r--r-- | ia32/TargetPrinter.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ia32/TargetPrinter.ml b/ia32/TargetPrinter.ml index f2358487..979ac800 100644 --- a/ia32/TargetPrinter.ml +++ b/ia32/TargetPrinter.ml @@ -667,7 +667,7 @@ module Target(System: SYSTEM):TARGET = | Init_float32 n -> fprintf oc " .long %ld %s %.18g\n" (camlint_of_coqint (Floats.Float32.to_bits n)) - comment (camlfloat_of_coqfloat n) + comment (camlfloat_of_coqfloat32 n) | Init_float64 n -> fprintf oc " .quad %Ld %s %.18g\n" (camlint64_of_coqint (Floats.Float.to_bits n)) |