mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-06-03 04:38:32 +02:00
26 lines
343 B
ObjectPascal
26 lines
343 B
ObjectPascal
{ Source provided for Free Pascal Bug Report 2363 }
|
|
{ Submitted by "Maarten Bekers" on 2003-02-07 }
|
|
{ e-mail: bugs-fpc@elebbs.com }
|
|
unit tw2363;
|
|
|
|
{$mode delphi}
|
|
|
|
interface
|
|
|
|
type blah = function: integer;
|
|
function iee: integer; export;
|
|
|
|
|
|
var blah2: blah;
|
|
|
|
implementation
|
|
|
|
function iee: integer; export;
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
blah2 := iee;
|
|
end.
|
|
|