rename module: Rec -> JRec
commit839ef88b96cfcfea0a854a39f1c12c0cc70bc000
authorSridhar Ratnakumar <srid@srid.ca>
dateFri 31 Jul 2020, 10:30 (6 years ago)
parenta7a2144
jrec.cabal+3−3
@@ -20,9 +20,9 @@ extra-source-files:
2020library
2121 hs-source-dirs: src
2222 exposed-modules:
23− Rec
24− Rec.Super
25− Rec.Tuple
23+ JRec
24+ JRec.Super
25+ JRec.Tuple
2626
2727 default-extensions:
2828 BlockArguments
src/Rec.hs → src/JRec.hsrenamed+5−5
@@ -2,7 +2,7 @@
22{-# LANGUAGE PatternSynonyms #-}
33{-# LANGUAGE TypeApplications #-}
44
5−module Rec
5+module JRec
66 ( Record,
77 pattern Record,
88 (:=:),
@@ -28,11 +28,11 @@ import GHC.Generics
2828import GHC.OverloadedLabels
2929import GHC.TypeLits
3030import Generic.Data
31−import qualified Rec.Super as R
31+import qualified JRec.Super as R
3232import Control.Lens ((&), (^.))
33−import Rec.Super ((:=))
34−import Rec.Tuple
35−import Rec.Field
33+import JRec.Super ((:=))
34+import JRec.Tuple
35+import JRec.Field
3636import Test.Tasty.HUnit
3737import Unsafe.Coerce
3838
src/Rec/Field.hs → src/JRec/Field.hsrenamed+1−1
@@ -1,4 +1,4 @@
1−module Rec.Field where
1+module JRec.Field where
22
33import qualified Data.Generics.Labels as GL
44import qualified Data.Generics.Product.Fields as GL
src/Rec/Super.hs → src/JRec/Super.hsrenamed+1−1
@@ -23,7 +23,7 @@
2323-- export a lot of good things, and it was easier to just copy the
2424-- implementation since we don't need much out of it.
2525
26−module Rec.Super where
26+module JRec.Super where
2727
2828import Control.DeepSeq
2929import Control.Monad.Reader
src/Rec/Tuple.hs → src/JRec/Tuple.hsrenamed+2−2
@@ -1,8 +1,8 @@
11-- Generated with cabal run -v0 bin/genrecord > src/Rec/Tuple.hs
22-- TODO: Import this script, and make it generate 'Rec' instead of 'Record'
3−module Rec.Tuple where
3+module JRec.Tuple where
44import Prelude
5−import qualified Rec.Super as R
5+import qualified JRec.Super as R
66import Unsafe.Coerce
77class RecTuple tuple fields | tuple -> fields, fields -> tuple where
88 fromTuple :: tuple -> R.Rec fields