11 lines
179 B
ObjectPascal
11 lines
179 B
ObjectPascal
|
unit u1;
|
|||
|
|
|
|||
|
|
interface
|
|||
|
|
procedure pr1(param1: integer:= 0);
|
|||
|
|
|
|||
|
|
implementation
|
|||
|
|
procedure pr1(param1: integer):= exit;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
pr1{@procedure u1.pr1(param1: integer:=0);@};
|
|||
|
|
end.
|