From bb20015f58f01c621dbd5b9d8a10fe18f8a50dbb Mon Sep 17 00:00:00 2001 From: bostic Date: Thu, 7 Aug 1997 19:02:17 +0000 Subject: [PATCH] update From: Sven Verdoolaege --- perl_api/perl.xs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/perl_api/perl.xs b/perl_api/perl.xs index 2647d973..016e992e 100644 --- a/perl_api/perl.xs +++ b/perl_api/perl.xs @@ -14,7 +14,7 @@ #include "config.h" #ifndef lint -static const char sccsid[] = "$Id: perl.xs,v 8.28 1997/08/03 15:46:33 bostic Exp $ (Berkeley) $Date: 1997/08/03 15:46:33 $"; +static const char sccsid[] = "$Id: perl.xs,v 8.29 1997/08/07 19:02:17 bostic Exp $ (Berkeley) $Date: 1997/08/07 19:02:17 $"; #endif /* not lint */ #include @@ -37,7 +37,7 @@ static const char sccsid[] = "$Id: perl.xs,v 8.28 1997/08/03 15:46:33 bostic Exp #include #include -#include "perl_extern.h" +#include "../perl_api/extern.h" static void msghandler __P((SCR *, mtype_t, char *, size_t)); @@ -417,10 +417,10 @@ extern void boot_VI _((CV* cv)); static void xs_init() { + char *file = __FILE__; #ifdef HAVE_PERL_5_003_01 dXSUB_SYS; #endif - char *file = __FILE__; newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file); newXS("VI::bootstrap", boot_VI, file); -- 2.11.4.GIT