tw1432.pp 126 B

12345678910
  1. { %FAIL }
  2. procedure something;
  3. procedure SomethingExt (onepar:longint); external;
  4. begin
  5. SomethingExt (1);
  6. end;
  7. begin
  8. end.