mirror of
https://github.com/juspay/jrec.git
synced 2024-09-11 10:25:32 +03:00
parent
9649572445
commit
d976477eb2
@ -37,4 +37,4 @@ Run tests inside ghcid using `bin/test`.
|
||||
|
||||
## Acknowledgement
|
||||
|
||||
* The `Rec.Super` module is entirely based on the code from [superrecord](https://hackage.haskell.org/package/superrecord).
|
||||
* The `JRec.Internal` module is entirely based on the code from [superrecord](https://hackage.haskell.org/package/superrecord).
|
||||
|
@ -21,8 +21,8 @@ library
|
||||
hs-source-dirs: src
|
||||
exposed-modules:
|
||||
JRec
|
||||
JRec.Internal
|
||||
other-modules:
|
||||
JRec.Super
|
||||
JRec.Tuple
|
||||
JRec.Field
|
||||
|
||||
|
@ -24,8 +24,8 @@ import GHC.OverloadedLabels
|
||||
import GHC.TypeLits
|
||||
import Generic.Data
|
||||
import JRec.Field
|
||||
import JRec.Super (Rec, (:=) (..))
|
||||
import qualified JRec.Super as R
|
||||
import JRec.Internal (Rec, (:=) (..))
|
||||
import qualified JRec.Internal as R
|
||||
import JRec.Tuple
|
||||
import Unsafe.Coerce
|
||||
|
||||
|
@ -23,7 +23,7 @@
|
||||
-- export a lot of good things, and it was easier to just copy the
|
||||
-- implementation since we don't need much out of it.
|
||||
|
||||
module JRec.Super where
|
||||
module JRec.Internal where
|
||||
|
||||
import Control.DeepSeq
|
||||
import Control.Monad.Reader
|
@ -2,7 +2,7 @@
|
||||
-- TODO: Import this script, and make it generate 'JRec' instead of 'Record'
|
||||
module JRec.Tuple where
|
||||
import Prelude
|
||||
import qualified JRec.Super as R
|
||||
import qualified JRec.Internal as R
|
||||
import Unsafe.Coerce
|
||||
class RecTuple tuple fields | tuple -> fields, fields -> tuple where
|
||||
fromTuple :: tuple -> R.Rec fields
|
||||
|
Loading…
Reference in New Issue
Block a user