<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Maybe this is useful to someone:<div><br></div><div>Try this:<div><br></div><div>JSJsonParser parseStream: '{lhs: "1 Brazil real",rhs: "0.592768 U.S. dollars",error: "",icc: true}' readStream</div><div><br></div><div>it can't parse that, so..</div><div><br></div><div>...patch it with this:</div><div><br></div><div>JSJsonParser#parseProperty</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>| name value |</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>name := self parsePropertyName.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>value := self parseValue.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>^ self createProperty: name with: value.</div><div><br></div><div><div>JSJsonParser#parsePropertyName</div><div><div><span class="Apple-tab-span" style="white-space:pre"> </span>| result |</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>result := WriteStream on: String new.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>[ stream atEnd or: [ stream peek = $: ] ] </div><div><span class="Apple-tab-span" style="white-space:pre"> </span>whileFalse: [ result nextPut: self parseCharacter ].</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>^ self expect: ':'; createString: result contents</div></div></div><div><br></div><div>then you get it working like this:</div><div> a Dictionary('error'->'' 'icc'->true 'lhs'->'1 Brazil real' 'rhs'->'0.592768 U.S. dollars' )</div><div><br></div><div><div>
<div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><a href="http://about.me/sebastianconcept">sebastian</a></div><div><br></div><div>o/</div></div><br class="Apple-interchange-newline"><br class="Apple-interchange-newline">
</div>
<br></div></div></body></html>