fpPause function not working on 2.0.2 [2005/12/21] for x86_64

classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

fpPause function not working on 2.0.2 [2005/12/21] for x86_64

Terry Kemp
The fppause function doesn't seem to work anymore. It just goes straight
through with no delay at all. I'm sure I have had this working
previously (using oldlinux unit).

Can anyone confirm if this works on 32 bit fpc.

thanks

Terry


Free Pascal Compiler version 2.0.2 [2005/12/21] for x86_64

{ Program to demonstrate the Alarm function. }

Uses baseunix,crt;

Procedure AlarmHandler(Sig : longint);cdecl;

begin
  Writeln ('Got to alarm handler');
end;

begin
  Writeln('Setting alarm handler');
  fpSignal(SIGALRM,@AlarmHandler);
repeat
  Writeln ('Scheduling Alarm in 10 seconds');
  fpAlarm(10);
  Writeln ('Pausing');
  fpPause;
  Writeln ('Pause returned');
 until keypressed;
end.


_______________________________________________
fpc-pascal maillist  -  [hidden email]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal