From: adam <adam@megacz.com>
Date: Thu, 28 Aug 2008 09:54:16 +0000 (+0100)
Subject: allow hex digits in #expect directives
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=43b97e87411b000843c00c3c43cde62f51c4ca06;p=fleet.git

allow hex digits in #expect directives
---

diff --git a/src/edu/berkeley/fleet/assembler/fleet.g b/src/edu/berkeley/fleet/assembler/fleet.g
index 7b4ac5e..0ad2b11 100644
--- a/src/edu/berkeley/fleet/assembler/fleet.g
+++ b/src/edu/berkeley/fleet/assembler/fleet.g
@@ -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!            = ()