Attempt to make CWorld correct instance of Store

src/MaybeHelp.hs

@@ -1,10 +1,13 @@
 {-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE StrictData #-}
 {-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE ScopedTypeVariables #-}
 module MaybeHelp where
 import Control.Lens
 import Data.Aeson
 import GHC.Generics
+import TH.Derive
+import Data.Store
 
 data Maybe' a = Just' {__Just' :: a} | Nothing'
     deriving (Eq,Ord,Show,Read,Generic)
@@ -34,3 +37,4 @@ toggleJust Nothing = Just ()
 toggleJust _ = Nothing
 
 makeLenses ''Maybe'
+$($(derive [d| instance (Store a => Deriving (Store (Maybe' a))) |]))