Mercurial > hg > xemacs-beta

comparison src/lisp-union.h @ 1632:64eaceca611d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-08-19 02:07:03 by james] Enable module building and running on Cygwin and MinGW.
author james
date Tue, 19 Aug 2003 02:07:16 +0000
parents 184461bc8de4
children facf3239ba30
comparison
equal deleted inserted replaced
1631:1bf7b032a45d 1632:64eaceca611d
130 Lisp_Object obj; 130 Lisp_Object obj;
131 obj.ui = (EMACS_UINT) ptr; 131 obj.ui = (EMACS_UINT) ptr;
132 return obj; 132 return obj;
133 } 133 }
134 134
135 extern Lisp_Object Qnull_pointer, Qzero; 135 extern MODULE_API Lisp_Object Qnull_pointer, Qzero;
136 136
137 #define INTP(x) ((x).s.bits) 137 #define INTP(x) ((x).s.bits)
138 #define INT_PLUS(x,y) make_int (XINT (x) + XINT (y)) 138 #define INT_PLUS(x,y) make_int (XINT (x) + XINT (y))
139 #define INT_MINUS(x,y) make_int (XINT (x) - XINT (y)) 139 #define INT_MINUS(x,y) make_int (XINT (x) - XINT (y))
140 #define INT_PLUS1(x) make_int (XINT (x) + 1) 140 #define INT_PLUS1(x) make_int (XINT (x) + 1)