add linux syscall sys_getrandom to lcorernd
[lcore.git] / lsignal.pas
old mode 100755 (executable)
new mode 100644 (file)
index ef98905..b64e07e
@@ -116,13 +116,13 @@ end;
 {$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
@@ -133,7 +133,7 @@ begin
   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
@@ -156,7 +156,7 @@ const
     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