1
1
mirror of https://github.com/github/semantic.git synced 2024-11-24 08:54:07 +03:00

Don’t specify Node in the assignment spec.

This commit is contained in:
Rob Rix 2017-06-07 14:27:01 -04:00
parent a66a76bb01
commit 84c15e3e65

View File

@ -101,14 +101,14 @@ instance Symbol Grammar where
data Out = Out ByteString
deriving (Eq, Show)
red :: Assignment (Node Grammar) Out
red :: Assignment Grammar Out
red = Out <$ symbol Red <*> source
green :: Assignment (Node Grammar) Out
green :: Assignment Grammar Out
green = Out <$ symbol Green <*> source
blue :: Assignment (Node Grammar) Out
blue :: Assignment Grammar Out
blue = Out <$ symbol Blue <*> source
magenta :: Assignment (Node Grammar) Out
magenta :: Assignment Grammar Out
magenta = Out <$ symbol Magenta <*> source