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