diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2024-10-27 22:31:38 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2024-10-27 22:31:38 -0600 |
| commit | 4b85b09593fae1b72a6d64b09a7843f9a28dbe99 (patch) | |
| tree | c66fbdf882d70a4228311a174736d52908d903b4 /src/Language/Fiddle/Parser.hs | |
| parent | 5d3f21123b585fb1c43da9d854b04c61678405df (diff) | |
| download | fiddle-4b85b09593fae1b72a6d64b09a7843f9a28dbe99.tar.gz fiddle-4b85b09593fae1b72a6d64b09a7843f9a28dbe99.tar.bz2 fiddle-4b85b09593fae1b72a6d64b09a7843f9a28dbe99.zip | |
Enforce that registers are either 8, 16, 32, or 64 bits.
Fixed the issues where the output C code did not use correct register
sizes.
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) ) |