mirror of
https://git.openldap.org/openldap/openldap.git
synced 2025-01-30 13:30:57 +08:00
Cleanup ASPERL ifdefs
This commit is contained in:
parent
d1cc334deb
commit
3a8720d3db
@ -26,9 +26,7 @@ perl_back_add(
|
||||
int len;
|
||||
int count;
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
ldap_pvt_thread_mutex_lock( &entry2str_mutex );
|
||||
|
||||
|
@ -42,10 +42,7 @@ perl_back_bind(
|
||||
return rs->sr_err;
|
||||
}
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
|
||||
{
|
||||
|
@ -41,9 +41,7 @@ perl_back_compare(
|
||||
op->orc_ava->aa_desc->ad_cname.bv_val ), "=" ),
|
||||
op->orc_ava->aa_value.bv_val );
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
|
||||
{
|
||||
|
@ -25,9 +25,7 @@ perl_back_delete(
|
||||
PerlBackend *perl_back = (PerlBackend *) op->o_bd->be_private;
|
||||
int count;
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
|
||||
{
|
||||
|
@ -27,10 +27,7 @@ perl_back_modify(
|
||||
int count;
|
||||
int i;
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
|
||||
{
|
||||
|
@ -25,10 +25,7 @@ perl_back_modrdn(
|
||||
PerlBackend *perl_back = (PerlBackend *) op->o_bd->be_private;
|
||||
int count;
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
|
||||
{
|
||||
|
@ -61,6 +61,7 @@ extern ldap_pvt_thread_mutex_t perl_interpreter_mutex;
|
||||
# define PERL_INTERPRETER perl_interpreter
|
||||
# define PERL_BACK_XS_INIT_PARAMS void
|
||||
# define PERL_BACK_BOOT_DYNALOADER_PARAMS CV *cv
|
||||
# define PERL_SET_CONTEXT(i)
|
||||
#endif
|
||||
|
||||
extern PerlInterpreter *PERL_INTERPRETER;
|
||||
|
@ -34,9 +34,7 @@ perl_back_search(
|
||||
char *buf;
|
||||
int i;
|
||||
|
||||
#if defined(HAVE_WIN32_ASPERL) || defined(USE_ITHREADS)
|
||||
PERL_SET_CONTEXT( PERL_INTERPRETER );
|
||||
#endif
|
||||
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
|
||||
|
||||
{
|
||||
|
Loading…
Reference in New Issue
Block a user