Mercurial > hg > xemacs-beta

comparison src/opaque.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 632411c376d0
children 34abfb24e891
comparison
equal deleted inserted replaced
1631:1bf7b032a45d 1632:64eaceca611d
61 DECLARE_LRECORD (opaque_ptr, Lisp_Opaque_Ptr); 61 DECLARE_LRECORD (opaque_ptr, Lisp_Opaque_Ptr);
62 #define XOPAQUE_PTR(x) XRECORD (x, opaque_ptr, Lisp_Opaque_Ptr) 62 #define XOPAQUE_PTR(x) XRECORD (x, opaque_ptr, Lisp_Opaque_Ptr)
63 #define wrap_opaque_ptr(p) wrap_record (p, opaque_ptr) 63 #define wrap_opaque_ptr(p) wrap_record (p, opaque_ptr)
64 #define OPAQUE_PTRP(x) RECORDP (x, opaque_ptr) 64 #define OPAQUE_PTRP(x) RECORDP (x, opaque_ptr)
65 65
66 Lisp_Object make_opaque_ptr (void *val); 66 MODULE_API Lisp_Object make_opaque_ptr (void *val);
67 void free_opaque_ptr (Lisp_Object ptr); 67 MODULE_API void free_opaque_ptr (Lisp_Object ptr);
68 68
69 #define get_opaque_ptr(op) (XOPAQUE_PTR (op)->ptr) 69 #define get_opaque_ptr(op) (XOPAQUE_PTR (op)->ptr)
70 #define set_opaque_ptr(op, ptr_) (XOPAQUE_PTR (op)->ptr = (ptr_)) 70 #define set_opaque_ptr(op, ptr_) (XOPAQUE_PTR (op)->ptr = (ptr_))
71 71
72 #endif /* INCLUDED_opaque_h_ */ 72 #endif /* INCLUDED_opaque_h_ */