|
|
| version 1.2, 2010/06/29 05:20:45 | version 1.3, 2014/11/13 04:43:10 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| ^print[^o1::create[]] | |
| <br /> | |
| ^print[^o2::create[]] | |
| $o[^test::create[]] | |
| $v($o) | @print[o][v] |
| =$v.CLASS_NAME=$v= | Class: <b>$o.CLASS_NAME</b><br /> |
| expression: ^eval($o)<br /> | |
| $v[^hash::create[$o]] | $v[^hash::create[$o]] |
| =$v.CLASS_NAME=$v.key= | hash: $v.key<br /> |
| $v[^table::create[$o]] | $v[^table::create[$o]] |
| =$v.CLASS_NAME=$v.name= | table: $v.name<br /> |
| def: ^if(def $o){true}{false}<br /> | |
| bool: ^if($o || 0){true}{false}<br /> | |
| $v(def $o) | double: ^eval($o + 0)<br /> |
| =$v.CLASS_NAME=^v.int[]= | |
| $v($o || 0) | |
| =$v.CLASS_NAME=^v.int[]= | |
| $v($o + 0) | |
| =$v.CLASS_NAME=$v= | |
| @CLASS | @CLASS |
| test | o1 |
| @create[] | @create[] |
| @GET[sMode] | @GET[mode] |
| ^switch[$sMode]{ | ^switch[$mode]{ |
| ^case[expression]{ $result(-1) } | ^case[expression]{ $result(-1) } |
| ^case[hash]{ $result[$.key[hash value]] } | ^case[hash]{ $result[$.key[hash-value]] } |
| ^case[table]{ $result[^table::create{name^#0Atable value}] } | ^case[table]{ $result[^table::create{name^#0Atable-value}] } |
| ^case[def]{ $result(1) } | ^case[def]{ $result(true) } |
| ^case[bool]{ $result(false) } | ^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'] } | ^case[DEFAULT]{ ^throw[;unsupported mode '$sMode'] } |
| } | } |