← Back to branch summary

~ubuntu-branches/ubuntu/dapper/fpc/dapper

« back to all changes in this revision

Viewing changes to rtl/unix/gensigset.inc

  • Committer: Bazaar Package Importer
  • Author(s): Carlos Laviola
  • Date: 2005-05-30 11:59:10 UTC
  • mfrom: (1.2.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20050530115910-x5pbzm4qqta4i94h
Tags: 2.0.0-2
http://bugs.debian.org/310907
debian/fp-compiler.postinst.in: forgot to reapply the patch that
correctly creates the slave link to pc(1).  (Closes: #310907)

Show diffs side-by-side

added added

removed removed

Lines of Context:
rtl/unix/gensigset.inc
1
1
{
2
 
   $Id: gensigset.inc,v 1.4 2003/12/30 12:24:01 marco Exp $
 
2
   $Id: gensigset.inc,v 1.5 2005/02/14 17:13:31 peter Exp $
3
3
   This file is part of the Free Pascal run time library.
4
4
   (c) 2002 by Marco van de Voort
5
5
   members of the Free Pascal development team.
6
 
   
 
6
 
7
7
   Generic POSIX signal functions draft. Based on a few constants.
8
8
 
9
9
   See the file COPYING.FPC, included in this distribution,
25
25
     End;
26
26
   nset[(signo-1) shr ln2bitsinword]:=nset[(signo-1) shr ln2bitsinword] OR (1 shl ((signo-1) and ln2bitmask));
27
27
   fpsigaddset:=0;
28
 
End;   
 
28
End;
29
29
 
30
30
function fpsigdelset(var nset : tsigset;signo:cint): cint;
31
31
 
67
67
     End;
68
68
    if ((nset[(signo-1) shr ln2bitsinword]) and (1 shl ((signo-1) and ln2bitmask)))>0 Then
69
69
     fpsigismember:=1
70
 
    else 
 
70
    else
71
71
     fpsigismember:=0;
72
 
End;      
 
72
End;
73
73
 
74
74
{
75
75
   $Log: gensigset.inc,v $
76
 
   Revision 1.4  2003/12/30 12:24:01  marco
77
 
    * FPC_USE_LIBC
78
 
 
79
 
   Revision 1.3  2003/06/01 16:28:41  marco
80
 
    * Enhancements to make the compiler baseunix using.
81
 
 
82
 
   Revision 1.2  2002/12/18 16:50:39  marco
83
 
    * Unix RTL generic parts. Linux working, *BSD will follow shortly
84
 
 
85
 
   Revision 1.1  2002/11/14 12:20:30  marco
86
 
    * initial version, taken from bsdfunc.inc, since both linux and bsd use it
87
 
 
88
 
 
89
 
}
 
 
b'\\ No newline at end of file'
 
76
   Revision 1.5  2005/02/14 17:13:31  peter
 
77
     * truncate log
 
78
 
 
79
}