parser3/tests/253.html - diff

Return to 253.html CVS log

Up to [parser3project] / parser3 / tests

version 1.4, 2010/10/01 23:11:24	version 1.9, 2024/09/10 19:32:10
Line 3	Line 3
$f[^file::load[text;253_json.txt; $.charset[windows-1251]]]	$f[^file::load[text;253_json.txt; $.charset[windows-1251]]]
$s[^taint[as-is][$f.text]]	$s[^taint[as-is][$f.text]]

^try_catch{$o[^json:parse[$s]]}	^try-catch{$o[^json:parse[$s; $.array[hash] ]]}

$o[^json:parse[$s][ $.object[$hook] $.distinct[first] ]]	^test[$s][ $.object[$hook] $.distinct[first] ]
^print[$o]

$o[^json:parse[$s][ $.double(false) $.distinct[last] ]]	^test[$s][ $.double(false) $.distinct[last] ]
^print[$o]

$o[^json:parse[$s][ $.object[$hook_key] $.distinct[all] ]]	^test[$s][ $.int(false) $.distinct[last] ]
^print[$o]
	^test[$s][ $.object[$hook_key] $.distinct[all] ]

@try_catch[code]	$s[[1,{"type":"class1","value":"3"},4]]
^try{
$code	^test[$s][ $.object[$hook] ]
}{
$exception.handled(true)	^test[$s]
$exception.source
$exception.comment	@test[s;options]
}	$o[^json:parse[$s][ $options $.array[hash] ]]
	^print[$o]

@print[hash]	@print[hash]
^json:string[$hash; $.indent(1)]	$result[^json:string[$hash; $.indent(1)]]
	$result[^result.replace[e+0;e+]]

@hook[key;value]	@hook[key;value]
$result[^if(def $value.type){^reflection:create[$value.type;create;$value]}{$value}]	$result[^if(def $value.type){^reflection:create[$value.type;create;$value]}{$value}]

E-mail: