@main[] auto v $o:v auto log $o:log $o:a[1] set a: $o:log get a: $o:a $o:b[2] set b: $o:log get b: $o:b @CLASS o @auto[] $v[2] @create[] @GET_DEFAULT[] default @SET_a[value] $log[SET_a called with '$value'] @GET_b[] b @SET_DEFAULT[name;value] $log[SET_DEFAULT called for '$name' with '$value']