summaryrefslogtreecommitdiff
path: root/appl/lib/json.b
diff options
context:
space:
mode:
authorforsyth <forsyth@vitanuova.com>2011-04-08 15:40:13 +0100
committerforsyth <forsyth@vitanuova.com>2011-04-08 15:40:13 +0100
commit32038f425fe093998bd875b939ccdc3d88b5acfc (patch)
treeeee82e247b819ea9471b8e709d35a8434d75e82d /appl/lib/json.b
parent09fa9b42130335ddb8876b9be05f780093519864 (diff)
20110408-1540
Diffstat (limited to 'appl/lib/json.b')
-rw-r--r--appl/lib/json.b4
1 files changed, 2 insertions, 2 deletions
diff --git a/appl/lib/json.b b/appl/lib/json.b
index 50e93b27..f4fdce14 100644
--- a/appl/lib/json.b
+++ b/appl/lib/json.b
@@ -279,9 +279,9 @@ writeval(out: ref Iobuf, o: ref JValue) raises(Badwrite)
String =>
writestring(out, r.s);
Int =>
- puts(out, string r.value);
+ puts(out, r.text());
Real =>
- puts(out, string r.value);
+ puts(out, r.text());
Object => # '{' [pair (',' pair)*] '}'
putc(out, '{');
for(l := r.mem; l != nil; l = tl l){