Mercurial > emacs
comparison src/m/iris4d.h @ 52495:7afb553c7135
(XMARKBIT, XUNMARK): Remove.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 12 Sep 2003 19:54:10 +0000 |
parents | 695cf19ef79e |
children | 23a17af379b1 |
comparison
equal
deleted
inserted
replaced
52494:96d237d6be00 | 52495:7afb553c7135 |
---|---|
1 /* machine description file for Iris-4D machines. Use with s/irix*.h. | 1 /* machine description file for Iris-4D machines. Use with s/irix*.h. |
2 Copyright (C) 1987, 2002 Free Software Foundation, Inc. | 2 Copyright (C) 1987, 2002, 2003 Free Software Foundation, Inc. |
3 | 3 |
4 This file is part of GNU Emacs. | 4 This file is part of GNU Emacs. |
5 | 5 |
6 GNU Emacs is free software; you can redistribute it and/or modify | 6 GNU Emacs is free software; you can redistribute it and/or modify |
7 it under the terms of the GNU General Public License as published by | 7 it under the terms of the GNU General Public License as published by |
168 | 168 |
169 #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) | 169 #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) |
170 | 170 |
171 #define XSET(var, type, ptr) \ | 171 #define XSET(var, type, ptr) \ |
172 ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) | 172 ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
173 | |
174 #define XUNMARK(a) ((a) = (((unsigned)(a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) | |
175 #endif /* _LP64 */ | 173 #endif /* _LP64 */ |
176 | 174 |
177 #ifndef __GNUC__ | 175 #ifndef __GNUC__ |
178 /* Turn off some "helpful" error checks for type mismatches | 176 /* Turn off some "helpful" error checks for type mismatches |
179 that we can't fix without breaking other machines. */ | 177 that we can't fix without breaking other machines. */ |