Skip to content
This repository was archived by the owner on Mar 27, 2026. It is now read-only.

Commit 3a00d80

Browse files
committed
Remove NamedFieldPuns language extension
1 parent db9599c commit 3a00d80

1 file changed

Lines changed: 2 additions & 3 deletions

File tree

src/Crypto/Scrypt.hs

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,4 @@
1-
{-# LANGUAGE ForeignFunctionInterface, OverloadedStrings,
2-
RecordWildCards, NamedFieldPuns #-}
1+
{-# LANGUAGE ForeignFunctionInterface, OverloadedStrings, RecordWildCards #-}
32

43
-- |Scrypt is a sequential memory-hard key derivation function. This module
54
-- provides low-level bindings to the 'scrypt' key derivation function as
@@ -92,7 +91,7 @@ scryptParamsLen
9291
-- Must be greater than zero and less than or equal to @(2^32-1)*32@.
9392
-> Maybe ScryptParams
9493
scryptParamsLen logN r p bufLen
95-
| valid = Just Params { logN, r, p, bufLen }
94+
| valid = Just Params {..}
9695
| otherwise = Nothing
9796
where
9897
valid = and [ logN > 0, r > 0, p > 0

0 commit comments

Comments
 (0)