1
1
mirror of https://github.com/github/semantic.git synced 2024-12-23 14:54:16 +03:00

Define product type syntax.

This commit is contained in:
Rob Rix 2017-03-30 14:06:47 -04:00
parent e6e6b8e900
commit b7aa2650f6

View File

@ -4,3 +4,6 @@ import Prologue
data Annotation a = Annotation { annotationSubject :: !a, annotationType :: !a }
deriving (Eq, Show)
newtype Product a = Product { productElements :: [a] }
deriving (Eq, Show)