--- parser3/tests/232.html 2010/06/29 05:20:45 1.2
+++ parser3/tests/232.html 2014/11/13 04:43:10 1.3
@@ -1,37 +1,57 @@
@main[]
+^print[^o1::create[]]
+
+^print[^o2::create[]]
-$o[^test::create[]]
-$v($o)
-=$v.CLASS_NAME=$v=
+@print[o][v]
+Class: $o.CLASS_NAME
+
+expression: ^eval($o)
$v[^hash::create[$o]]
-=$v.CLASS_NAME=$v.key=
+hash: $v.key
$v[^table::create[$o]]
-=$v.CLASS_NAME=$v.name=
+table: $v.name
+
+def: ^if(def $o){true}{false}
+
+bool: ^if($o || 0){true}{false}
-$v(def $o)
-=$v.CLASS_NAME=^v.int[]=
+double: ^eval($o + 0)
-$v($o || 0)
-=$v.CLASS_NAME=^v.int[]=
-$v($o + 0)
-=$v.CLASS_NAME=$v=
@CLASS
-test
+o1
@create[]
-@GET[sMode]
-^switch[$sMode]{
+@GET[mode]
+^switch[$mode]{
^case[expression]{ $result(-1) }
- ^case[hash]{ $result[$.key[hash value]] }
- ^case[table]{ $result[^table::create{name^#0Atable value}] }
- ^case[def]{ $result(1) }
+ ^case[hash]{ $result[$.key[hash-value]] }
+ ^case[table]{ $result[^table::create{name^#0Atable-value}] }
+ ^case[def]{ $result(true) }
^case[bool]{ $result(false) }
- ^case[double]{ $result(5) }
+ ^case[double]{ $result(255) }
+ ^case[DEFAULT]{ ^throw[;unsupported mode '$sMode'] }
+}
+
+
+@CLASS
+o2
+
+@create[]
+
+@GET[mode]
+^switch[$mode]{
+ ^case[expression]{ $result(0) }
+ ^case[hash]{ $result[$.key[hash-value]] }
+ ^case[table]{ $result[^table::create{name^#0Atable-value}] }
+ ^case[def]{ $result(false) }
+ ^case[bool]{ $result(true) }
+ ^case[double]{ $result(32) }
^case[DEFAULT]{ ^throw[;unsupported mode '$sMode'] }
}