json parser rules for bnfc

json.cf

VObject.   Value ::= "{" [Item] "}" ;
ObjItem.   Item ::= String ":" Value ;
separator  Item "," ;
terminator Item "" ;

VArray.    Value ::= "[" [Value] "]" ;
separator  Value "," ;
terminator Value "" ;

VInt.      Value ::= Integer ;
VDouble.   Value ::= Double ;
VString.   Value ::= String ;
VTrue.     Value ::= "true" ;
VFalse.    Value ::= "false" ;
VNull.     Value ::= "null" ;

test.json

{
  "Name": "aisk",
  "Age": 17,
  "hack": true,
  "bug": null,
  "word": {"Hello": "World"}
}