fix(json): Fix bug in std/json where keys were not escaped properly

thesephist · Jul 4, 2021 · b6fd222 · b6fd222
1 parent 0fac801
commit b6fd222
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/samples/json.ink b/samples/json.ink
@@ -34,7 +34,7 @@ ser := c => type(c) :: {
 	'boolean' -> string(c)
 	` do not serialize functions `
 	'function' -> 'null'
-	'composite' -> '{' + cat(map(keys(c), k => '"' + k + '":' + ser(c.(k))), ',') + '}'
+	'composite' -> '{' + cat(map(keys(c), k => '"' + escape(k) + '":' + ser(c.(k))), ',') + '}'
 }
 
 ` is this character a numeral digit or .? `

diff --git a/samples/test.ink b/samples/test.ink
@@ -991,6 +991,8 @@ me')
 	` complex serde `
 	obj := {
 		ser: 'de'
+		'\\': 3
+		'esc\\': 'back\\slash'
 		apple: 'dessert'
 		func: () => ()
 		x: ['train', false, 'car', true, {x: ['y', 'z']}]