From d4abb8de79c00a6ae5e08d3bc58b08e9edaeff4d Mon Sep 17 00:00:00 2001 From: Alexey Kuleshevich Date: Mon, 10 Jun 2024 15:23:34 +0200 Subject: [PATCH] Update bench-legacy/SimpleRNGBench.hs MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Co-authored-by: Handré Stolp --- bench-legacy/SimpleRNGBench.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bench-legacy/SimpleRNGBench.hs b/bench-legacy/SimpleRNGBench.hs index b91509c3..dfffeb86 100644 --- a/bench-legacy/SimpleRNGBench.hs +++ b/bench-legacy/SimpleRNGBench.hs @@ -87,7 +87,7 @@ instance RandomGen NoopRNG where split g = (g, g) -- An RNG generating only 0 or 1: -newtype BinRNG = BinRNG StdGen +data BinRNG = BinRNG StdGen instance RandomGen BinRNG where next (BinRNG g) = (x `mod` 2, BinRNG g') where