blob: 1feda6ddbbd5c49bd41b4f850df5dc7b45125ce3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
{-# LANGUAGE Haskell2010 #-}
module T8743 where
-- Without the following import, it does not fail
import T8743a ()
-- [()] required, () does not work.
class ToRow a where toRow :: a -> [()]
instance ToRow (Maybe a) where
toRow Nothing = [()]
toRow (Just _) = [()]
|