summaryrefslogtreecommitdiff
path: root/src/Language/Fiddle/Parser.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Language/Fiddle/Parser.hs')
-rw-r--r--src/Language/Fiddle/Parser.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Language/Fiddle/Parser.hs b/src/Language/Fiddle/Parser.hs
index ebc3d8d..e8f1b62 100644
--- a/src/Language/Fiddle/Parser.hs
+++ b/src/Language/Fiddle/Parser.hs
@@ -216,7 +216,7 @@ objTypeDeclP =
<|> ( do
modifier <- optionMaybe modifierP
tok_ KWReg
- RegisterDecl () modifier
+ RegisterDecl () modifier . Perhaps
<$> optionMaybe ident
<*> exprInParenP
<*> optionMaybe (tok TokColon *> registerBodyP)