From 37660f8fe9c3ccd35ab4d4a181d1871490aa9343 Mon Sep 17 00:00:00 2001 From: Alexey Kuleshevich Date: Sat, 3 Feb 2024 16:06:22 +0100 Subject: [PATCH] doctest --- src/System/Random/Seed.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/System/Random/Seed.hs b/src/System/Random/Seed.hs index 5d409d26..a873eedc 100644 --- a/src/System/Random/Seed.hs +++ b/src/System/Random/Seed.hs @@ -76,6 +76,7 @@ import qualified System.Random.SplitMix32 as SM32 -- seedGen64 (x :| _) = OneByteGen (fromIntegral x) -- unseedGen64 (OneByteGen x) = fromIntegral x :| [] -- :} +-- -- >>> unseedGen (OneByteGen 0x80) -- Seed [0x80] -- >>> unseedGen64 (OneByteGen 0x80)