grammar My-Grammar {
    token TOP       { \s* <object> \s* }
    rule object     { '{' \s* <pairlist> '}' \s* }
    rule pairlist   {  <pair> * % \,  }
    rule pair       {  <string>':' <value> }
    token string    {  \" <[ \w \s \- ' ]>+ \"  }
    token number    { [ \d+ [ \. \d+ ]? ] | [ \. \d+ ] }
    token value     {   <object> | <string> | <number> 
               | true    | false     | null 
    }
}