bugfix:hexadecimal ranges 0x00..0x01

2 files changed, 9 insertions, 1 deletions

diff --git a/rod/scanner.nim b/rod/scanner.nim
index 04a41fb5c..fb9a9fa2c 100755
--- a/rod/scanner.nim
+++ b/rod/scanner.nim
@@ -357,7 +357,7 @@ proc GetNumber(L: var TLexer): TToken =
         result.base = base16
         while true: 
           case L.buf[pos]
-          of 'G'..'Z', 'g'..'z', '.': 
+          of 'G'..'Z', 'g'..'z': 
             lexMessage(L, errInvalidNumber, result.literal)
             inc(pos)
           of '_': 
diff --git a/tests/accept/compile/thexrange.nim b/tests/accept/compile/thexrange.nim
new file mode 100755
index 000000000..875a5bab3
--- /dev/null
+++ b/tests/accept/compile/thexrange.nim
@@ -0,0 +1,8 @@
+
+type
+  TArray = array[0x0012..0x0013, int]
+  
+var a: TArray
+
+echo a[0] #OUT 0
+