79 79
80 80 <h2>Json parser</h2>
81 81 Uses [/doc/tip/lalr/lalr.ss|lalr.ss]
82 82 <verbatim>
83 83 (import (json))
84 84
85 85
86 - (string->json "{ \"name\" : \"my-name\" , \"age\" : 120 , \"children\" : { \"name\" : \"my-son\", \"age\" : 1 }, { \"name\" : \"my-son2\", \"age\" : 2 } }" )
86 + (string->json "[{ \"name\" : \"my-name\" , \"age\" : 120 , \"children\" : [{ \"name\" : \"my-son\", \"age\" : 1 }, { \"name\" : \"my-son2\", \"age\" : 2 }] }]" )
87 87 => ((name . "my-name")
88 88 (age . 120)
89 89 (children .
90 90 #(((name . "my-son") (age . 1))
91 91 ((name . "my-son2") (age . 2)))))
92 92
93 93 </verbatim>