Commit 7434dc6d authored by Kurt Zeilenga's avatar Kurt Zeilenga
Browse files

Misc updates from HEAD

parent f2b1115b
......@@ -175,7 +175,7 @@ perl_back_db_open(
static void
perl_back_xs_init()
perl_back_xs_init(PERL_BACK_XS_INIT_PARAMS)
{
char *file = __FILE__;
dXSUB_SYS;
......
......@@ -5,28 +5,25 @@
LDAP_BEGIN_DECL
/*
* From Apache mod_perl: test for Perl version.[ja
* From Apache mod_perl: test for Perl version.
*/
#ifdef pTHX_
#if defined(pTHX_) || (PERL_REVISION > 5 || (PERL_REVISION == 5 && PERL_VERSION >= 6))
#define PERL_IS_5_6
#endif
#define EVAL_BUF_SIZE 500
#ifdef pTHX_
#define PERL_IS_5_6
#endif
extern ldap_pvt_thread_mutex_t perl_interpreter_mutex;
#ifdef HAVE_WIN32_ASPERL
#ifdef PERL_IS_5_6
/* We should be using the PL_errgv, I think */
/* All the old style variables are prefixed with PL_ now */
# define errgv PL_errgv
# define na PL_na
#endif
#ifdef HAVE_WIN32_ASPERL
#ifdef HAVE_WIN32_ASPERL
/* pTHX is needed often now */
# define PERL_INTERPRETER my_perl
# define PERL_BACK_XS_INIT_PARAMS pTHX
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment