secondlistener
[lcore.git] / lsignal.pas
index 49e51b24bba1c2f1f3b44a96ba9f8f046a3539f7..833c56ecbbed4918b4ca51d1327b2499638c6292 100755 (executable)
@@ -37,7 +37,7 @@ var
   firstsignal : tlsignal;\r
   blockset : sigset;\r
   signalloopback                        : tlloopback ;\r
-  
+  \r
 implementation\r
 {$include unixstuff.inc}\r
 \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