浏览代码

Bug in dozenal number parser

Getty Ritter 9 年之前
父节点
当前提交
28749d52bc
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      Data/SCargot/Common.hs

+ 1 - 1
Data/SCargot/Common.hs

@@ -171,7 +171,7 @@ dozDigit = digit <|> oneOf "AaBb\x218a\x218b"
 --   and @'\x218b'@ (↋) as digits with the decimal values @10@ and @11@
 --   respectively.
 dozNumber :: Parser Integer
-dozNumber = number 16 dozDigit
+dozNumber = number 12 dozDigit
 
 -- | A parser for signed duodecimal (dozenal) numbers, with an optional leading @+@ or @-@.
 signedDozNumber :: Parser Integer