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 authored Jun 10, 2024
1 parent 8aea80e commit d670221
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 d670221

Please sign in to comment.