|
|
more tests for ^reflection:delete[]
@main[]
$a[^a::create[]]
1. ^print[$a]
^reflection:delete[$a;b]
2. ^print[$a]
3. ^print[$a.CLASS]
^reflection:delete[$a.CLASS;c]
4. ^print[$a.CLASS]
5. $a.x
^reflection:delete[$a.CLASS;x]
6. $a.x
@print[x][h;k;v]
$h[^hash::create[$x]]
$result[^h.foreach[k;v]{$k='$v'}[, ]]
@CLASS
a
@create[]
$a[1]
$b[2]
@auto[]
$c[3]
$d[4]
@GET_x[]
x property