File tree Expand file tree Collapse file tree 2 files changed +3
-2
lines changed
Expand file tree Collapse file tree 2 files changed +3
-2
lines changed Original file line number Diff line number Diff line change @@ -31,7 +31,8 @@ import Data.List.NonEmpty (NonEmptyList(..))
3131import Data.Maybe (Maybe (..), fromJust )
3232import Data.Newtype (wrap )
3333import Data.NonEmpty (NonEmpty (..), (:|))
34- import Data.String.CodeUnits (charAt , fromCharArray , split )
34+ import Data.String (split )
35+ import Data.String.CodeUnits (charAt , fromCharArray )
3536import Data.String.NonEmpty (NonEmptyString )
3637import Data.String.NonEmpty.CodeUnits as NES
3738import Data.Symbol (class IsSymbol , SProxy (..))
Original file line number Diff line number Diff line change @@ -253,5 +253,5 @@ foreign import float32ToInt32 :: Number -> Int
253253-- | Perturb a random generator by modifying the current seed
254254perturbGen :: forall a . Number -> Gen a -> Gen a
255255perturbGen n gen = Gen do
256- modify \s -> s { newSeed = lcgPerturb (toNumber (float32ToInt32 n)) s.newSeed }
256+ void $ modify \s -> s { newSeed = lcgPerturb (toNumber (float32ToInt32 n)) s.newSeed }
257257 unGen gen
You can’t perform that action at this time.
0 commit comments