diff options
Diffstat (limited to 'src/Language/Fiddle/Parser.hs')
| -rw-r--r-- | src/Language/Fiddle/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Language/Fiddle/Parser.hs b/src/Language/Fiddle/Parser.hs index 1bc75bc..415852c 100644 --- a/src/Language/Fiddle/Parser.hs +++ b/src/Language/Fiddle/Parser.hs @@ -224,7 +224,7 @@ objTypeDeclP = tok_ KWReg RegisterDecl Vacant modifier . Perhaps <$> optionMaybe ident - <*> exprInParenP + <*> fmap RightV exprInParenP <*> optionMaybe (tok TokColon *> registerBodyP) ) |