Go back to JSON encoding

2022-08-21 21:23:59 +01:00
parent dd62e30026
commit f1ef75f511
95 changed files with 9 additions and 586 deletions
@@ -9,9 +9,6 @@ module Dodge.Data.Block (
    module Dodge.Data.PathGraph,
 ) where

-import TH.Derive
-import Data.Store
-import Data.Binary
 import Flat
 import LinearHelp ()
 import Color
@@ -55,6 +52,3 @@ makeLenses ''Block
 deriveJSON defaultOptions ''Block
 deriveJSON defaultOptions ''BlockDraw
 deriveJSON defaultOptions ''BlSh
-$($(derive [d| instance Deriving (Store BlSh) |]))
-$($(derive [d| instance Deriving (Store Block ) |]))
-$($(derive [d| instance Deriving (Store BlockDraw) |]))