variable initial value - bug? (rev. 8151)

[DrD]

Now if you place the local statement within the program block it will be local only to the program, instead of the program's environment. This should work as you expected:

Code:

 
EXPORT VAR_TEST()
BEGIN
  local k:=1;  // Moved local statement here
  PRINT();
  PRINT(k);
  IF k=1 THEN
    k:=0;
  END;
END;