allow hex digits in #expect directives
authoradam <adam@megacz.com>
Thu, 28 Aug 2008 09:54:16 +0000 (10:54 +0100)
committeradam <adam@megacz.com>
Thu, 28 Aug 2008 09:54:16 +0000 (10:54 +0100)
src/edu/berkeley/fleet/assembler/fleet.g

index 7b4ac5e..0ad2b11 100644 (file)
@@ -67,7 +67,7 @@ DockName        = DowncaseWord
 Word            = UpcaseWord | DowncaseWord
 UpcaseWord      = Name:: [A-Z]    ("":: [A-Za-z0-9_]**)
 DowncaseWord    = Name:: [a-z]    ("":: [A-Za-z0-9_]**)
-int::           = (^"-"|^"") (^"0x"|^"0b"|^"") (digits:: [0-9]++)
+int::           = (^"-"|^"") (^"0x"|^"0b"|^"") (digits:: [0-9A-Fa-f]++)
 
 ws!             = wsx -> ~[\r\n ]
 wsx!            = ()