tw10081.pp 250 B

1234567891011121314151617
  1. { %fail }
  2. {$mode delphi}
  3. { manual verification: make sure it complains about a missing overload
  4. directive rather than saying that overloading is disabled
  5. }
  6. procedure test(a: longint);
  7. begin
  8. end;
  9. procedure test(s: string);
  10. begin
  11. end;
  12. begin
  13. end.