File:  [parser3project] / parser3 / tests / 277.html
Revision 1.4: download - view: text, annotated - select for diffs - revision graph
Tue Feb 14 14:35:06 2017 UTC (9 years, 4 months ago) by moko
Branches: MAIN
CVS tags: release_3_5_1, release_3_5_0, release_3_4_6, release_3_4_5, HEAD
test for hash with only $._default is now defined (related to bug #1131)

@main[]

$json[{
"bigint": 123456789012345
}]

$o[^json:parse[$json]]
$o.hash[ $.value[hash] ]

$o.b[^test::create[]]
$o.c[^test2::create[]]

1. ^json:string[$o; $._default[$2jsonDefault] $.test[$2json]]

#just $._default
$h[ $._default[$2jsonDefault] ]
2. ^json:string[$o;$h]
^if(def $h){defined OK}{not defined BUG}

@2json[key;value;options]
{key is: $key; value is: ^json:string[$value]}

@2jsonDefault[key;value;options]
{default, key is: $key; value is: ^json:string[$value]}


@CLASS
test

@create[]
$value[value]

@CLASS
test2

@create[]
$value2[value2]

E-mail: