ExtensionClass: Use MINIMAL pragma

This commit is contained in:
slotThe 2021-04-01 17:51:59 +02:00
parent 5cdf428f55
commit c869129c71

View File

@ -387,6 +387,7 @@ instance Message LayoutMessages
--
-- Minimal complete definition: initialValue
class Typeable a => ExtensionClass a where
{-# MINIMAL initialValue #-}
-- | Defines an initial value for the state extension
initialValue :: a
-- | Specifies whether the state extension should be