test_entropy: fail again, but disable on arm64

mirage · Dec 6, 2024 · 53b1898 · 53b1898
1 parent 5c885b0
commit 53b1898
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/tests/dune b/tests/dune
@@ -41,7 +41,9 @@
  (name test_entropy)
  (modules test_entropy)
  (package mirage-crypto-rng)
- (libraries mirage-crypto-rng ohex))
+ (libraries mirage-crypto-rng ohex)
+ (enabled_if (<> %{architecture} "arm64")))
+ ; see https://github.com/mirage/mirage-crypto/issues/216
 
 (test
  (name test_ec)

diff --git a/tests/test_entropy.ml b/tests/test_entropy.ml
@@ -35,7 +35,7 @@ let timer_check () =
     let data' = Mirage_crypto_rng.Entropy.interrupt_hook () in
     if String.equal !data data' then begin
       Ohex.pp Format.std_formatter data';
-      print_endline ("same data from timer at " ^ string_of_int i);
+      failwith ("same data from timer at " ^ string_of_int i);
     end;
     data := data'
   done