aboutsummaryrefslogtreecommitdiff
path: root/src/main/stanza/ir-parser.stanza
diff options
context:
space:
mode:
Diffstat (limited to 'src/main/stanza/ir-parser.stanza')
-rw-r--r--src/main/stanza/ir-parser.stanza5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/main/stanza/ir-parser.stanza b/src/main/stanza/ir-parser.stanza
index b511f640..dd7679cc 100644
--- a/src/main/stanza/ir-parser.stanza
+++ b/src/main/stanza/ir-parser.stanza
@@ -112,7 +112,10 @@ defsyntax firrtl :
int$ != () : FPE(form, "Expected a single integer literal here.")
;Error if not a single long integer
- long$ = (?i:#intorlong ?rest ...) when empty?(rest) : to-long(i)
+ long$ = (?i:#intorlong ?rest ...) when empty?(rest) :
+ match(i) :
+ (i:Long) : i
+ (i) : to-long(i)
long$ != () : FPE(form, "Expected a single long integer literal here.")
;Error if not a single width