mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-06 22:31:13 -07:00
Code Issues Projects Releases Wiki Activity

Add bs_upper_half (request.epcore.160026)

Browse source 
Copied from Perforce
 Change: 19415
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Pekka Pirinen 1998-04-16 19:15:40 +01:00
parent 26ad3e27f1
commit ac8a8fe705
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
mps/src/misc.h
View file

@ -1,7 +1,7 @@
/* impl.h.misc: MISCELLANEOUS DEFINITIONS
*
* $HopeName: MMsrc!misc.h(trunk.18) $
* Copyright (C) 1997 The Harlequin Group Limited. All rights reserved.
* $HopeName: MMsrc!misc.h(trunk.19) $
* Copyright (C) 1997. Harlequin Group plc. All rights reserved.
*
* Small general things which are useful for C but aren't part of the
* memory manager itself. The only reason that this file exists is
@ -119,6 +119,7 @@ typedef const struct SrcIdStruct {
#define BS_EMPTY(ty) ((ty)0)
#define BS_COMP(s) (~(s))
#define BS_UNIV(ty) BS_COMP(BS_EMPTY(ty))
#define BS_UPPER_HALF(ty) (BS_UNIV(ty) << (sizeof(ty) * 4))
#define BS_SINGLE(ty, i) ((ty)1 << (i))
#define BS_IS_MEMBER(s, i) (((s) >> (i)) & 1)
#define BS_UNION(s1, s2) ((s1) | (s2))