20 lines
209 B
ObjectPascal
20 lines
209 B
ObjectPascal
unit interface_parameter2;
|
|
|
|
interface
|
|
|
|
procedure p1({@}a: byte);
|
|
procedure p1(a: byte; b: real);
|
|
|
|
implementation
|
|
|
|
procedure p1({!}a: byte);
|
|
begin
|
|
|
|
end;
|
|
|
|
procedure p1(a: byte; b: real);
|
|
begin
|
|
|
|
end;
|
|
|
|
end. |