@@ -195,6 +195,9 @@ map f = mapM (return . f)
196MONAD_APPLICATIVE_INSTANCE(SerialT,)
196MONAD_APPLICATIVE_INSTANCE(SerialT,)
197MONAD_COMMON_INSTANCES(SerialT,)
197MONAD_COMMON_INSTANCES(SerialT,)
198+LIST_INSTANCES(SerialT)
199+FOLDABLE_INSTANCE(SerialT)
200+TRAVERSABLE_INSTANCE(SerialT)
199------------------------------------------------------------------------------
202------------------------------------------------------------------------------
200-- WSerialT
203-- WSerialT
@@ -332,12 +335,6 @@ instance Monad m => Monad (WSerialT m) where
333MONAD_APPLICATIVE_INSTANCE(WSerialT,)
336MONAD_APPLICATIVE_INSTANCE(WSerialT,)
334MONAD_COMMON_INSTANCES(WSerialT,)
337MONAD_COMMON_INSTANCES(WSerialT,)
336−LIST_INSTANCES(SerialT)
337LIST_INSTANCES(WSerialT)
338LIST_INSTANCES(WSerialT)
339−FOLDABLE_INSTANCE(SerialT)
340FOLDABLE_INSTANCE(WSerialT)
339FOLDABLE_INSTANCE(WSerialT)
342−TRAVERSABLE_INSTANCE(SerialT)
343TRAVERSABLE_INSTANCE(WSerialT)
340TRAVERSABLE_INSTANCE(WSerialT)