mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 16:47:53 +02:00
26 lines
349 B
ObjectPascal
26 lines
349 B
ObjectPascal
{ %TARGET=win64,wince,win32,linux,android }
|
|
|
|
{ Source provided for Free Pascal Bug Report 2364 }
|
|
{ Submitted by "Maarten Bekers" on 2003-02-08 }
|
|
{ e-mail: fpc-bugs@elebbs.com }
|
|
unit tw2364;
|
|
|
|
interface
|
|
|
|
type blah = function: integer;
|
|
function iee: integer;
|
|
|
|
|
|
var blah2: blah;
|
|
|
|
implementation
|
|
|
|
function iee: integer;
|
|
begin
|
|
end;
|
|
|
|
exports
|
|
iee;
|
|
|
|
end.
|