Mercurial > hg > xemacs-beta

comparison modules/ldap/eldap.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents 4ec724310f33
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
69 /************************************************************************/ 69 /************************************************************************/
70 70
71 static DECLARE_DOESNT_RETURN (signal_ldap_error (LDAP *, LDAPMessage *, int)); 71 static DECLARE_DOESNT_RETURN (signal_ldap_error (LDAP *, LDAPMessage *, int));
72 72
73 static DOESNT_RETURN 73 static DOESNT_RETURN
74 signal_ldap_error (LDAP *ld, LDAPMessage *res, int ldap_err) 74 signal_ldap_error (LDAP *ld,
75 #if defined HAVE_LDAP_PARSE_RESULT || defined HAVE_LDAP_RESULT2ERROR
76 LDAPMessage *res,
77 #else
78 LDAPMessage *UNUSED (res),
79 #endif
80 int ldap_err)
75 { 81 {
76 if (ldap_err <= 0) 82 if (ldap_err <= 0)
77 { 83 {
78 #if defined HAVE_LDAP_PARSE_RESULT 84 #if defined HAVE_LDAP_PARSE_RESULT
79 int err; 85 int err;
115 { 121 {
116 return XLDAP (obj)->host; 122 return XLDAP (obj)->host;
117 } 123 }
118 124
119 static void 125 static void
120 print_ldap (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag) 126 print_ldap (Lisp_Object obj, Lisp_Object printcharfun, int UNUSED (escapeflag))
121 { 127 {
122 Lisp_LDAP *ldap = XLDAP (obj); 128 Lisp_LDAP *ldap = XLDAP (obj);
123 129
124 if (print_readably) 130 if (print_readably)
125 printing_unreadable_object ("#<ldap %s>", XSTRING_DATA (ldap->host)); 131 printing_unreadable_object ("#<ldap %s>", XSTRING_DATA (ldap->host));