Apply suggestions from code review

Co-authored-by: Xavier Clerc <xclerc@users.noreply.github.com>

backend/cfg/cfg.ml

@@ -284,7 +284,7 @@ let dump_op ppf = function
   | Intofvalue -> Format.fprintf ppf "intofvalue"
   | Scalarcast (Float_of_int Float64) -> Format.fprintf ppf "floatofint"
   | Scalarcast (Float_to_int Float64) -> Format.fprintf ppf "intoffloat"
-  | Scalarcast (Float_of_int Float32) -> Format.fprintf ppf "float32toint"
+  | Scalarcast (Float_of_int Float32) -> Format.fprintf ppf "float32ofint"
   | Scalarcast (Float_to_int Float32) -> Format.fprintf ppf "intoffloat32"
   | Scalarcast Float_of_float32 -> Format.fprintf ppf "floatoffloat32"
   | Scalarcast Float_to_float32 -> Format.fprintf ppf "float32offloat"

tests/small_numbers/basic.ml

@@ -28,12 +28,10 @@ let check_floats f =
   f zero;
   f one;
   f minus_one;
-  f one;
   f (-0.0);
   f nan;
   f infinity;
   f neg_infinity;
-  f nan;
   f max_float;
   f min_float;
   for i = 0 to 100_000 do