Skip to content

Commit 8af21fa

Browse files
committed
WIP unworking newtype deriving
1 parent 613e64a commit 8af21fa

File tree

2 files changed

+2
-0
lines changed

2 files changed

+2
-0
lines changed

rhine-cassava/rhine-cassava.cabal

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -89,6 +89,7 @@ library
8989
default-language: Haskell2010
9090

9191
default-extensions:
92+
DerivingStrategies
9293
FlexibleInstances
9394
MultiParamTypeClasses
9495
NamedFieldPuns

rhine-cassava/src/FRP/Rhine/Clock/Csv.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -27,6 +27,7 @@ and returns a parsed record.
2727
Additionally to an end-of-file error, it can also return a parse error as a 'String'.
2828
-}
2929
newtype CsvClock = CsvClock (File String (Vector Record))
30+
deriving newtype (Clock (ExceptT (Either String FileException) IO) CsvClock)
3031

3132
-- | Create a 'CsvClock' from a file path.
3233
csvClock :: FilePath -> CsvClock

0 commit comments

Comments
 (0)