2008/4/3, Russell Whitaker <russ@ashlandhome.net>:

On Thu, 3 Apr 2008, Prof A Olowofoyeku (The African Chief) wrote:

On 3 Apr 2008 at 10:59, Régis Cridlig wrote:

Hello!

This short program compiles without a warning, but crashes at execution.
The compiler is FPC 2.2 on the win32 platform.

^^^^^^^
Hmmm, can you run FPC using gpc as the command?
Anyway, program compiles and runs using latest gpc on linux platform.

Hope this helps
Russ

program Crashes(input,output);

function B(l:integer):boolean;
begin
B:=true;
end;

procedure Q(j:integer;function A(l:integer):boolean);

function E(l:integer):boolean;
begin
E := false
end;

begin
if A(j) then
Q(200,E);
end;

begin
Q(100,B);
end.

This is the compiler command:
$ gpc --classic-pascal -g -Wall crashes.p

Which GPC version are you using?