File:
[parser3project] /
parser3 /
tests /
258.html
Revision
1.1:
download - view:
text,
annotated -
select for diffs -
revision graph
Sat Oct 9 23:14:42 2010 UTC (15 years, 7 months ago) by
moko
Branches:
MAIN
CVS tags:
release_3_5_1,
release_3_5_0,
release_3_4_6,
release_3_4_5,
release_3_4_4,
release_3_4_3,
release_3_4_2,
release_3_4_1,
HEAD
test for constructor returning another object
@main[]
1. Object constructor returning object.
^print[^test::create[;value for object]]
2. Object constructor returning hash.
^print[^test::create[hash;value for hash]]
3. Reflection returning object.
^print[^reflection:create[test;create;;value for object]]
4. Reflection returning hash.
^print[^reflection:create[test;create;hash;value for hash]]
@print[o]
Class:$o.CLASS_NAME
Type property:$o.type
Value property:$o.value
@CLASS
test
@create[kind;v]
^if($kind eq 'hash'){
$result[^hash::create[
$.type[hash]
$.value[$v]
]]
}{
$result[$self]
$type[object]
$value[$v]
}
E-mail: