Fix bug in tjjson
This commit is contained in:
parent
19633c9019
commit
e29e7b3038
|
@ -198,7 +198,7 @@ let lit_string =
|
||||||
begin function
|
begin function
|
||||||
| '\"' | '\\' | '/' as c -> return (string1 c)
|
| '\"' | '\\' | '/' as c -> return (string1 c)
|
||||||
| 'b' -> return "\b"
|
| 'b' -> return "\b"
|
||||||
(* | 'f' -> return "\f"*)
|
| 'f' -> return "\x0c"
|
||||||
| 'n' -> return "\n"
|
| 'n' -> return "\n"
|
||||||
| 'r' -> return "\r"
|
| 'r' -> return "\r"
|
||||||
| 't' -> return "\t"
|
| 't' -> return "\t"
|
||||||
|
|
Loading…
Reference in New Issue