#include "scheme48.h"
#include <stddef.h>
#include <ldap.h>

static s48_value scsh_ldap_record_type = S48_FALSE;
static s48_value scsh_ldapmessage_record_type = S48_FALSE;

s48_value scsh_enter_ldap(LDAP *ldap);
#define scsh_extract_ldap(x) \
	((LDAP *) \
	 s48_extract_integer(S48_RECORD_REF(x, 0)))

s48_value scsh_enter_ldapmessage(LDAPMessage *lm);
#define scsh_extract_ldapmessage(x) \
	((LDAPMessage *) \
	 s48_extract_integer(S48_RECORD_REF(x, 0)))

void scsh_ldap_main(void);