diff options
Diffstat (limited to 'ext/DynaLoader/dlutils.c')
| -rw-r--r-- | ext/DynaLoader/dlutils.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ext/DynaLoader/dlutils.c b/ext/DynaLoader/dlutils.c index 3bd58ed9b3..b1e0bd6fbf 100644 --- a/ext/DynaLoader/dlutils.c +++ b/ext/DynaLoader/dlutils.c @@ -26,11 +26,11 @@ static int dl_debug = 0; /* value copied from $DynaLoader::dl_error */ static void -dl_generic_private_init(CPERLarg) /* called by dl_*.xs dl_private_init() */ +dl_generic_private_init(pTHX) /* called by dl_*.xs dl_private_init() */ { char *perl_dl_nonlazy; #ifdef DEBUGGING - dl_debug = SvIV( perl_get_sv("DynaLoader::dl_debug", 0x04) ); + dl_debug = SvIV(get_sv("DynaLoader::dl_debug", 0x04) ); #endif if ( (perl_dl_nonlazy = getenv("PERL_DL_NONLAZY")) != NULL ) dl_nonlazy = atoi(perl_dl_nonlazy); @@ -45,7 +45,7 @@ dl_generic_private_init(CPERLarg) /* called by dl_*.xs dl_private_init() */ /* SaveError() takes printf style args and saves the result in LastError */ static void -SaveError(CPERLarg_ char* pat, ...) +SaveError(pTHX_ char* pat, ...) { va_list args; SV *msv; |