Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

[fix] Json parser: proper handle of floats between -1 and 0

  • Loading branch information...
commit 6b295a97eb4deea34bfbfeaca301c9404e8e59cb 1 parent ff0f481
@BourgerieQuentin BourgerieQuentin authored cedricss committed
Showing with 1 addition and 1 deletion.
  1. +1 −1  libbase/jsonLex.ml
View
2  libbase/jsonLex.ml
@@ -29,7 +29,7 @@ let regexp t_blank = [' ' '\t' '\n' '\r']
let regexp t_digit = ['0'-'9']
let regexp t_digits = t_digit+
-let regexp t_int = '0'| '-'? ['1'-'9'] t_digit*
+let regexp t_int = '0'| '-''0' | '-'? ['1'-'9'] t_digit*
let regexp t_frac = "." t_digits
let regexp t_e = ("e"|"E") ("+"|"-")?
let regexp t_exp = t_e t_digits
Please sign in to comment.
Something went wrong with that request. Please try again.