Mercurial > hg > xemacs-beta

comparison src/eldap.h @ 280:7df0dd720c89 r21-0b38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b38
author cvs
date Mon, 13 Aug 2007 10:32:22 +0200
parents 6330739388db
children c42ec1d1cded
comparison
equal deleted inserted replaced
279:c20b2fb5bb0a 280:7df0dd720c89
27 #define LDAPP(x) 0 27 #define LDAPP(x) 0
28 #undef CHECK_LDAP 28 #undef CHECK_LDAP
29 29
30 #else /* HAVE_LDAP */ 30 #else /* HAVE_LDAP */
31 31
32 extern Lisp_Object Qopen, Qclosed;
33
34 struct Lisp_LDAP; 32 struct Lisp_LDAP;
35 33
36 DECLARE_LRECORD (ldap, struct Lisp_LDAP); 34 DECLARE_LRECORD (ldap, struct Lisp_LDAP);
37 #define XLDAP(x) XRECORD (x, ldap, struct Lisp_LDAP) 35 #define XLDAP(x) XRECORD (x, ldap, struct Lisp_LDAP)
38 #define XSETLDAP(x, p) XSETRECORD (x, p, ldap) 36 #define XSETLDAP(x, p) XSETRECORD (x, p, ldap)
39 #define LDAPP(x) RECORDP (x, ldap) 37 #define LDAPP(x) RECORDP (x, ldap)
40 #define GC_LDAPP(x) GC_RECORDP (x, ldap) 38 #define GC_LDAPP(x) GC_RECORDP (x, ldap)
41 #define CHECK_LDAP(x) CHECK_RECORD (x, ldap) 39 #define CHECK_LDAP(x) CHECK_RECORD (x, ldap)
40 #define CONCHECK_LDAP(x) CONCHECK_RECORD (x, ldap)
42 #define LDAP_LIVE_P(x) (EQ (x->status_symbol, Qopen)) 41 #define LDAP_LIVE_P(x) (EQ (x->status_symbol, Qopen))
43 42
44 #define CHECK_LIVE_LDAP(ldap) do { \ 43 #define CHECK_LIVE_LDAP(ldap) do { \
45 CHECK_LDAP (ldap); \ 44 CHECK_LDAP (ldap); \
46 if (!LDAP_LIVE_P (XLDAP (ldap))) \ 45 if (!LDAP_LIVE_P (XLDAP (ldap))) \
47 signal_simple_error ("Attempting to access closed LDAP connection", \ 46 signal_simple_error ("Attempting to access closed LDAP connection", \
48 ldap); \ 47 ldap); \
49 } while (0) 48 } while (0)
50 49
51 50
52 51
53 52
54 #ifdef emacs 53 #ifdef emacs
55 54
56 Lisp_Object Fldapp (Lisp_Object object); 55 Lisp_Object Fldapp (Lisp_Object object);