|
|
test for issue #894 added
@main[]
$b[^b::create[]]
^b.print[]
^b.print(true)
@CLASS
a
@create[]
@void[]
a void $self.CLASS_NAME ^rem{b is OK}
@print[]
a::print:CLASS: $self.CLASS_NAME
@CLASS
b
@BASE
a
@void[]
b void
@print[bUseWorkaround][o]
^a:void[] ^rem{ normal base class call, but wcontext now is get_somebody_entered_some_class() == true }
$o[^a::create[]]
Local a object CLASS: $o.CLASS_NAME
^if($bUseWorkaround){
$s[^o.print[]]^rem{ another wcontext }
$s
}{
^o.print[]^rem{ same wcontext }
}