|
|
test for invalid ^break[] behavour added (bug #1077)
@main[]
broken ^^break[] demos (code works until first method call returns):
1. in STRING_POOL
^while(1){
$demo[yes^break[]no]
^method[1]
^method[2]
}
first break demo: $demo
2. in CONSTRUCT_OBJECT
^while(1){
$o[^O::create[]]
^method[1]
^method[2]
}
first break demo: $demo
3. code in variable bug:
^try-catch{
^while(1){
$demo{yes^break[]no}
$demo
^method[1]
^method[2]
}
$demo
}
@method[s]
debug $s
@CLASS
O
@create[]
$MAIN:demo[yes]
^break[]
$MAIN:demo[no]