removed incorrect executable status from files

[lcore.git] / lsignal.pas

diff --git a/lsignal.pas b/lsignal.pas
old mode 100755 (executable)
new mode 100644 (file)
index 49e51b2..968f45c
--- a/lsignal.pas
+++ b/lsignal.pas
@@ -14,7 +14,7 @@ interface
     {$ifdef VER1_0}\r
       linux,\r
     {$else}\r
-      baseunix,unix,unixutil,\r
+      baseunix,unix,unixutil,sockets,\r
     {$endif}\r
     classes,lcore,lloopback;\r
 \r
@@ -37,7 +37,7 @@ var
   firstsignal : tlsignal;\r
   blockset : sigset;\r
   signalloopback                        : tlloopback ;\r
-  
+  \r
 implementation\r
 {$include unixstuff.inc}\r
 \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
@@ -193,9 +193,9 @@ end;
 initialization\r
   fillchar(blockset,sizeof(blockset),0);\r
   blockset[0] := $FFFFFFFF - (1 shl sigstop) - (1 shl sigkill) - (1 shl sigsegv);\r
-  {$ifdef ver1_0}
-    saction.sa_mask := blockset[0];
-  {$else}
+  {$ifdef ver1_0}\r
+    saction.sa_mask := blockset[0];\r
+  {$else}\r
     saction.sa_mask := blockset;\r
   {$endif}\r
 end.\r