tb0118.pp 68 B

12345678
  1. { %FAIL }
  2. procedure p(primo,primo:longint);
  3. begin
  4. end;
  5. begin
  6. end.