mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 17:49:33 +02:00
19 lines
209 B
ObjectPascal
19 lines
209 B
ObjectPascal
Type
|
|
t1 = record
|
|
dummy:integer;
|
|
end;
|
|
t2 = record
|
|
dummy:string;
|
|
end;
|
|
|
|
operator = (i1,i2:t1) r:boolean;
|
|
begin
|
|
end;
|
|
|
|
operator = (i1,i2:t2) r:boolean;
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
end.
|