tests/webtbf/tw9053.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

{ %fail }

program UnknownLocalSymbol;

  procedure p;
  label
    10;
  begin
    if False then
      begin
        10: Exit
      end;
    goto 10
  end;

begin
end.