Skip to content

Commit

Permalink
Update bench-legacy/SimpleRNGBench.hs
Browse files Browse the repository at this point in the history
Co-authored-by: Handré Stolp <[email protected]>
  • Loading branch information
lehins and HanStolpo committed Oct 27, 2024
1 parent f9789fb commit 9331235
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion bench-legacy/SimpleRNGBench.hs
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down

0 comments on commit 9331235

Please sign in to comment.