X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/2d2676149292e4e388bb102a41a3d64349ac88ed..HEAD:/lsignal.pas?ds=inline

diff --git a/lsignal.pas b/lsignal.pas
old mode 100755
new mode 100644
index ef98905..b64e07e
--- a/lsignal.pas
+++ b/lsignal.pas
@@ -116,13 +116,13 @@ end;
 {$endif}
 
 // cdecl procedures are not name mangled
-// so USING something unlikely to cause colliesions in the global namespace
+// so USING something unlikely to cause collisions in the global namespace
 // is a good idea
 procedure lsignal_handler( Sig : Integer);cdecl;
 var
   currentsignal : tlsignal;
 begin
-//  writeln('in lsignal_hanler');
+//  writeln('in lsignal_handler');
   currentsignal := firstsignal;
   while assigned(currentsignal) do begin
     if assigned(currentsignal.onsignal) then currentsignal.onsignal(currentsignal,sig);
@@ -133,7 +133,7 @@ begin
   if assigned(signalloopback) then begin
     signalloopback.sendstr(' ');
   end;
-//  writeln('left lsignal_hanler');
+//  writeln('left lsignal_handler');
 end;
 
 {$ifdef freebsd}
@@ -156,7 +156,7 @@ const
     saction : sigactionrec = (handler:(sh:lsignal_handler);sa_flags:0);
   {$else}
     {$ifdef darwin}
-      saction : sigactionrec = (sa_handler:tsigaction(lsignal_handler);sa_flags:0);
+      saction : sigactionrec = (sa_handler:sigactionhandler(lsignal_handler);sa_flags:0);
     {$else}
       {$ifdef freebsd}
         //version number is FPC_VERSION.FPC_RELEASE.FPC_PATCH