Adapt test to ocaml.5.3

Author: edwinans

tests/poly-fail/test.ml

@@ -1,7 +1,7 @@
 let ok =
   let test = (fun x -> x)
-  in test "string", test 1;;
+  in test "string", test (Random.int 1);;
 
 let ko =
   let test = (fun x -> x)[@landmark "test"]
-  in test "string", test 1;;
+  in test "string", test (Random.int 1);;

tests/poly-fail/test.out.expected

@@ -1,7 +1,7 @@
-val ok : string * int = ("string", 1)
-Line 4, characters 25-26:
-4 |   in test "string", test 1;;
-                             ^
+val ok : string * int = ("string", 0)
+Line 4, characters 25-39:
+4 |   in test "string", test (Random.int 1);;
+                             ^^^^^^^^^^^^^^
 Error: This expression has type "int" but an expression was expected of type
          "string"