Mercurial > hg > xemacs-beta

comparison src/opaque.h @ 382:064ab7fed2e0 r21-2-6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-6
author cvs
date Mon, 13 Aug 2007 11:07:39 +0200
parents 8626e4521993
children 74fd4e045ea6
comparison
equal deleted inserted replaced
381:908a86f940e6 382:064ab7fed2e0
78 Lisp_Object make_opaque_ptr (CONST void *val); 78 Lisp_Object make_opaque_ptr (CONST void *val);
79 Lisp_Object make_opaque_long (long val); 79 Lisp_Object make_opaque_long (long val);
80 void free_opaque_ptr (Lisp_Object ptr); 80 void free_opaque_ptr (Lisp_Object ptr);
81 81
82 #define OPAQUE_SIZE(op) XINT ((op)->size_or_chain) 82 #define OPAQUE_SIZE(op) XINT ((op)->size_or_chain)
83 #define OPAQUE_DATA(op) ((op)->data) 83 #define OPAQUE_DATA(op) ((void *) ((op)->data))
84 #define OPAQUE_MARKFUN(op) ((op)->markfun) 84 #define OPAQUE_MARKFUN(op) ((op)->markfun)
85 #define XOPAQUE_SIZE(op) OPAQUE_SIZE (XOPAQUE (op)) 85 #define XOPAQUE_SIZE(op) OPAQUE_SIZE (XOPAQUE (op))
86 #define XOPAQUE_DATA(op) OPAQUE_DATA (XOPAQUE (op)) 86 #define XOPAQUE_DATA(op) OPAQUE_DATA (XOPAQUE (op))
87 #define XOPAQUE_MARKFUN(op) OPAQUE_MARKFUN (XOPAQUE (op)) 87 #define XOPAQUE_MARKFUN(op) OPAQUE_MARKFUN (XOPAQUE (op))
88 88