revert test changes

Author: Ekdohibs

ocaml/testsuite/tests/basic-modules/anonymous.ocamlc.reference

@@ -23,9 +23,9 @@
         (let (f = (function param : int 0) s = (makemutable 0 ""))
           (seq
             (ignore
-              (let (*match* =[int] (setfield_ptr 0 s "Hello World!"))
+              (let (*match* = (setfield_ptr 0 s "Hello World!"))
                 (makeblock 0)))
             (let
               (drop = (function param : int 0)
-               *match* =[int] (apply drop (field_mut 0 s)))
+               *match* = (apply drop (field_mut 0 s)))
               (makeblock 0 A B f s drop))))))))

ocaml/testsuite/tests/basic-modules/anonymous.ocamlopt.flambda.reference

@@ -22,9 +22,8 @@
       (let (f = (function param : int 0) s = (makemutable 0 ""))
         (seq
           (ignore
-            (let (*match* =[int] (setfield_ptr 0 s "Hello World!"))
-              (makeblock 0)))
+            (let (*match* = (setfield_ptr 0 s "Hello World!")) (makeblock 0)))
           (let
             (drop = (function param : int 0)
-             *match* =[int] (apply drop (field_mut 0 s)))
+             *match* = (apply drop (field_mut 0 s)))
             (makeblock 0 A B f s drop)))))))

ocaml/testsuite/tests/basic-modules/anonymous.ocamlopt.reference

@@ -25,7 +25,7 @@
         (setfield_ptr(root-init) 3 (global Anonymous!) s))
       (ignore
         (let
-          (*match* =[int]
+          (*match* =
              (setfield_ptr 0 (field 3 (global Anonymous!)) "Hello World!"))
           (makeblock 0)))
       (let (drop = (function param : int 0))

ocaml/testsuite/tests/basic/patmatch_for_multiple.ml

@@ -26,14 +26,14 @@ match (3, 2, 1) with
 | _ -> false
 ;;
 [%%expect{|
-(let (*match*/274 =[int] 3 *match*/275 =[int] 2 *match*/276 =[int] 1)
+(let (*match*/274 = 3 *match*/275 = 2 *match*/276 = 1)
   (catch
     (catch
       (catch (if (!= *match*/275 3) (exit 3) (exit 1)) with (3)
         (if (!= *match*/274 1) (exit 2) (exit 1)))
      with (2) 0)
    with (1) 1))
-(let (*match*/274 =[int] 3 *match*/275 =[int] 2 *match*/276 =[int] 1)
+(let (*match*/274 = 3 *match*/275 = 2 *match*/276 = 1)
   (catch (if (!= *match*/275 3) (if (!= *match*/274 1) 0 (exit 1)) (exit 1))
    with (1) 1))
 - : bool = false
@@ -47,7 +47,7 @@ match (3, 2, 1) with
 | _ -> false
 ;;
 [%%expect{|
-(let (*match*/279 =[int] 3 *match*/280 =[int] 2 *match*/281 =[int] 1)
+(let (*match*/279 = 3 *match*/280 = 2 *match*/281 = 1)
   (catch
     (catch
       (catch
@@ -65,7 +65,7 @@ match (3, 2, 1) with
      with (5) 0)
    with (4 x/277[(consts ()) (non_consts ([0: [int], [int], [int]]))])
     (seq (ignore x/277) 1)))
-(let (*match*/279 =[int] 3 *match*/280 =[int] 2 *match*/281 =[int] 1)
+(let (*match*/279 = 3 *match*/280 = 2 *match*/281 = 1)
   (catch
     (if (!= *match*/280 3)
       (if (!= *match*/279 1) 0