X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/4782a5c5afee47721cc617daa40dd29828342c2b..9a44a542cab11c03215fe3c844dde2529a87258d:/lsignal.pas diff --git a/lsignal.pas b/lsignal.pas index 49e51b2..ef98905 100755 --- a/lsignal.pas +++ b/lsignal.pas @@ -14,7 +14,7 @@ interface {$ifdef VER1_0} linux, {$else} - baseunix,unix,unixutil, + baseunix,unix,unixutil,sockets, {$endif} classes,lcore,lloopback; @@ -37,7 +37,7 @@ var firstsignal : tlsignal; blockset : sigset; signalloopback : tlloopback ; - + implementation {$include unixstuff.inc} @@ -193,9 +193,9 @@ end; initialization fillchar(blockset,sizeof(blockset),0); blockset[0] := $FFFFFFFF - (1 shl sigstop) - (1 shl sigkill) - (1 shl sigsegv); - {$ifdef ver1_0} - saction.sa_mask := blockset[0]; - {$else} + {$ifdef ver1_0} + saction.sa_mask := blockset[0]; + {$else} saction.sa_mask := blockset; {$endif} end.