mirror of
https://github.com/polserver/polserver
synced 2026-08-13 08:23:08 -04:00
- Added missing ones - Reviewed obsoleted ones - Disabled/deleted unnecessary ones - Added support for compile error checking - Added support for run error checking
27 lines
319 B
Text
27 lines
319 B
Text
const EXPR_ZERO := 0;
|
|
|
|
function A(key)
|
|
var wtype;
|
|
var sev;
|
|
|
|
if (!EXPR_ZERO)
|
|
B();
|
|
else
|
|
foreach v in { 4,5,6 }
|
|
C();
|
|
endforeach
|
|
endif
|
|
sev := 7;
|
|
|
|
endfunction
|
|
|
|
function B()
|
|
endfunction
|
|
|
|
function C()
|
|
endfunction
|
|
|
|
program foo()
|
|
A(4);
|
|
print("ok");
|
|
endprogram
|