changeset 272:bb2b4613fdc8

Added support for encoding integers and booleans as JSON
author Michael Pavone <pavone@retrodev.com>
date Sat, 19 Jul 2014 20:18:34 -0700
parents bb4723fec05e
children 0dc7322590da
files cbackend.js modules/false.tp modules/json.tp modules/true.tp
diffstat 4 files changed, 13 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/cbackend.js	Sat Jul 19 19:59:51 2014 -0700
+++ b/cbackend.js	Sat Jul 19 20:18:34 2014 -0700
@@ -716,6 +716,12 @@
 			'return &(str->header);'
 		]
 	});
+	intObj.addMessage('jsonEncode', {
+		vars: {},
+		lines: [
+			'return mcall(' + getMethodId('string') + ', 1, &self->header);'
+		]
+	});
 	//7FFFFFFFFFFFFFFF
 	//01234567890123456789
 	intObj.addMessage('hex', {
--- a/modules/false.tp	Sat Jul 19 19:59:51 2014 -0700
+++ b/modules/false.tp	Sat Jul 19 20:18:34 2014 -0700
@@ -12,4 +12,5 @@
 		true
 	}
 	string <- { "false" }
+	jsonEncode <- { "false" }
 }
--- a/modules/json.tp	Sat Jul 19 19:59:51 2014 -0700
+++ b/modules/json.tp	Sat Jul 19 20:18:34 2014 -0700
@@ -189,6 +189,11 @@
 				baz <- ["fizz" "buzz" "buzzzz"]
 				qux <- ((dict hash) set: "fo" "shizzle") set: "my" "nizzle"
 				arr <- #["pirate" "booty"]
+				numbers <- [1 2 3 42 (0-1337)]
+				booleans <- [
+					true 
+					false
+				]
 			}
 			print: (encode: o) . "\n"
 			0
--- a/modules/true.tp	Sat Jul 19 19:59:51 2014 -0700
+++ b/modules/true.tp	Sat Jul 19 20:18:34 2014 -0700
@@ -12,4 +12,5 @@
 		false
 	}
 	string <- { "true" }
+	jsonEncode <- { "true" }
 }