{$ifdef VER1_0}\r
linux,\r
{$else}\r
- baseunix,unix,unixutil,\r
+ baseunix,unix,unixutil,sockets,\r
{$endif}\r
classes,lcore,lloopback;\r
\r
{$endif}\r
\r
// cdecl procedures are not name mangled\r
-// so USING something unlikely to cause colliesions in the global namespace\r
+// so USING something unlikely to cause collisions in the global namespace\r
// is a good idea\r
procedure lsignal_handler( Sig : Integer);cdecl;\r
var\r
currentsignal : tlsignal;\r
begin\r
-// writeln('in lsignal_hanler');\r
+// writeln('in lsignal_handler');\r
currentsignal := firstsignal;\r
while assigned(currentsignal) do begin\r
if assigned(currentsignal.onsignal) then currentsignal.onsignal(currentsignal,sig);\r
if assigned(signalloopback) then begin\r
signalloopback.sendstr(' ');\r
end;\r
-// writeln('left lsignal_hanler');\r
+// writeln('left lsignal_handler');\r
end;\r
\r
{$ifdef freebsd}\r
saction : sigactionrec = (handler:(sh:lsignal_handler);sa_flags:0);\r
{$else}\r
{$ifdef darwin}\r
- saction : sigactionrec = (sa_handler:tsigaction(lsignal_handler);sa_flags:0);\r
+ saction : sigactionrec = (sa_handler:sigactionhandler(lsignal_handler);sa_flags:0);\r
{$else}\r
{$ifdef freebsd}\r
//version number is FPC_VERSION.FPC_RELEASE.FPC_PATCH\r