Mercurial > repos > tabletprog

view samples/json.tp @ 186:35d2cc193d99

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add string conversion inside array join so callers don't need to worry about doing string conversions themselves
author Mike Pavone <pavone@retrodev.com>
date Mon, 26 Aug 2013 17:27:17 -0700
parents 6e579a75a0a9
children
line wrap: on
line source

#{
	main <- {
		arr <- json decode: "[\"foo\",  \"bar\", 13245, \"baz\"   ]"
		foreach: arr :idx val {
			print: (string: idx) . ": " . (string: val) . "\n"
		}
		obj <- json decode: "{\"foo\":    \"bar\",  \"baz\": \"qux\", \"meaningOfLife\": 42   }"
		foreach: obj :idx val {
			print: (string: idx) . ": " . (string: val) . "\n"
		}
	}
}