Revert "FIX: correct decoding escaped Unicode chars in the JSON codec"

Oldes · Oldes · commit cbd626277233 · 2023-05-08T11:17:01.000+02:00
This reverts commit c77e995.
diff --git a/src/mezz/codec-json.reb b/src/mezz/codec-json.reb
@@ -162,7 +162,7 @@ decode-unicode-char: func [
 	"Convert \uxxxx format (NOT simple JSON backslash escapes) to a Unicode char"
 	ch [string!] "4 hex digits"
 ][
-	try/except [to string! debase ch 16][ return none ]
+	try/except [to char! to integer! debase ch 16][ return none ]
 ]
 
 replace-unicode-escapes: func [

Original file line number	Diff line number	Diff line change
`@@ -162,7 +162,7 @@ decode-unicode-char: func [`
`162`	`162`	`"Convert \uxxxx format (NOT simple JSON backslash escapes) to a Unicode char"`
`163`	`163`	`ch [string!] "4 hex digits"`
`164`	`164`	`][`
`165`		`- try/except [to string! debase ch 16][ return none ]`
	`165`	`+ try/except [to char! to integer! debase ch 16][ return none ]`
`166`	`166`	`]`
`167`	`167`
`168`	`168`	`replace-unicode-escapes: func [`