Fix signals_alloc test (#9814)

testsuite/tests/callback/signals_alloc.ml

@@ -5,7 +5,7 @@
    ** bytecode
    ** native
 *)
-external raise_sigusr1 : unit -> unit = "raise_sigusr1" [@@noalloc]
+external raise_sigusr1 : unit -> unit = "raise_sigusr1"
 
 let do_test () =
   let seen_states = Array.make 5 (-1) in
@@ -24,7 +24,8 @@ let do_test () =
   let _ = Sys.opaque_identity (ref 1) in
   seen_states.(!pos) <- 4; pos := !pos + 1;
   Sys.set_signal Sys.sigusr1 Sys.Signal_default;
-  assert (seen_states = [|0;1;2;3;4|])
+  Array.iter (Printf.printf "%d") seen_states;
+  print_newline ()
 
 let () =
   for _ = 0 to 10 do do_test () done;

testsuite/tests/callback/signals_alloc.reference

@@ -1 +1,12 @@
+01234
+01234
+01234
+01234
+01234
+01234
+01234
+01234
+01234
+01234
+01234
 OK