mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-02 17:39:30 +01:00
23 lines
187 B
ObjectPascal
23 lines
187 B
ObjectPascal
unit tbs0237;
|
|
interface
|
|
|
|
procedure sub1(w1,w2:word);
|
|
|
|
implementation
|
|
|
|
procedure p1;
|
|
|
|
procedure sub1(w:word);
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
end;
|
|
|
|
|
|
procedure sub1(w1,w2:word);
|
|
begin
|
|
end;
|
|
|
|
end.
|