diff options
| author | Paul Oliver <contact@pauloliver.dev> | 2025-09-07 19:23:37 +0000 |
|---|---|---|
| committer | Paul Oliver <contact@pauloliver.dev> | 2025-09-07 19:49:03 +0000 |
| commit | 89aab732dc3d484b99c0761728285bca6f6b1ba0 (patch) | |
| tree | e2b4ca6656758dc9f398b9b1de2e6d92670b77df /hsm-core/Hsm/Core/Serial.hs | |
| parent | ef0713cbd90d6b84da7ea67e6dfc1fe5ab5bff86 (diff) | |
Diffstat (limited to 'hsm-core/Hsm/Core/Serial.hs')
| -rw-r--r-- | hsm-core/Hsm/Core/Serial.hs | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/hsm-core/Hsm/Core/Serial.hs b/hsm-core/Hsm/Core/Serial.hs index 9a4d2b7..7c607ff 100644 --- a/hsm-core/Hsm/Core/Serial.hs +++ b/hsm-core/Hsm/Core/Serial.hs @@ -2,21 +2,22 @@ module Hsm.Core.Serial ( makeSerial - ) where + ) +where import GHC.Num (integerFromInt) import Language.Haskell.TH - ( Body(NormalB) - , Clause(Clause) - , Con(NormalC) - , Dec(DataD, FunD, SigD) - , DerivClause(DerivClause) - , Exp(LitE) - , Lit(IntegerL) + ( Body (NormalB) + , Clause (Clause) + , Con (NormalC) + , Dec (DataD, FunD, SigD) + , DerivClause (DerivClause) + , Exp (LitE) + , Lit (IntegerL) , Name - , Pat(ConP) + , Pat (ConP) , Q - , Type(AppT, ArrowT, ConT) + , Type (AppT, ArrowT, ConT) , mkName ) |