tb0167.pp 68 B

123456789
  1. { %fail }
  2. procedure p(var a);
  3. begin
  4. end;
  5. begin
  6. p([1]);
  7. end.