@@ -132,7 +132,7 @@ data Params r
132132 -- > ParamSet [("x",pure y)] True (pure "s") ~ s@{ x ? y, ... }
133133 deriving
134134 ( Eq , Ord , Generic , Generic1
135- , Typeable , Data , NFData , NFData1 , Serialise , Binary , ToJSON , FromJSON
135+ , Typeable , Data , NFData , NFData1 , Serialise , Binary , ToJSON , ToJSON1 , FromJSON , FromJSON1
136136 , Functor , Foldable , Traversable
137137 , Show , Hashable , Hashable1
138138 )
@@ -165,7 +165,8 @@ data Antiquoted (v :: Type) (r :: Type)
165165 | Antiquoted ! r
166166 deriving
167167 ( Eq , Ord , Generic , Generic1
168- , Typeable , Data , NFData , NFData1 , Serialise , Binary , ToJSON , FromJSON
168+ , Typeable , Data , NFData , NFData1 , Serialise , Binary
169+ , ToJSON , ToJSON1 , FromJSON , FromJSON1
169170 , Functor , Foldable , Traversable
170171 , Show , Read , Hashable , Hashable1
171172 )
@@ -201,7 +202,7 @@ data NString r
201202 -- > ${y}''
202203 deriving
203204 ( Eq , Ord , Generic , Generic1
204- , Typeable , Data , NFData , NFData1 , Serialise , Binary , ToJSON , FromJSON
205+ , Typeable , Data , NFData , NFData1 , Serialise , Binary , ToJSON , ToJSON1 , FromJSON , FromJSON1
205206 , Functor , Foldable , Traversable
206207 , Show , Read , Hashable , Hashable1
207208 )
@@ -567,10 +568,7 @@ $(deriveOrd1 ''NString)
567568$ (deriveOrd1 ''Binding)
568569$ (deriveOrd1 ''NExprF)
569570
570- $ (deriveJSON1 defaultOptions ''Params)
571- $ (deriveJSON1 defaultOptions ''Antiquoted)
572571$ (deriveJSON2 defaultOptions ''Antiquoted)
573- $ (deriveJSON1 defaultOptions ''NString)
574572-- x $(deriveJSON1 defaultOptions ''Binding)
575573-- x $(deriveJSON1 defaultOptions ''NExprF)
576574
0 commit comments