Mercurial > repos > tabletprog
diff modules/json.tp @ 167:5a6a55592c45
Fix some JSON parser bugs
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 11 Aug 2013 03:01:05 -0700 |
parents | e7642715d575 |
children | 9d8ae39e8e67 |
line wrap: on
line diff
--- a/modules/json.tp Sun Aug 11 02:31:33 2013 -0700 +++ b/modules/json.tp Sun Aug 11 03:01:05 2013 -0700 @@ -10,7 +10,7 @@ neg <- "-" byte: 0 space <- " " byte: 0 comma <- "," byte: 0 - tab <- "\t" byte: 0 + tab <- " " byte: 0 nl <- "\n" byte: 0 cr <- "\r" byte: 0 colon <- ":" byte: 0 @@ -111,6 +111,7 @@ kd <- _decode: text at: cur key <- kd value cur <- kd after + expectKey <- false } } else: {