From 88db03abb7223b578824755dbddc848a12c083fe Mon Sep 17 00:00:00 2001 From: Marcelo Matus Date: Wed, 11 Jan 2006 20:15:39 +0000 Subject: [PATCH] finally, fix the croak/Nullch issue git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8374 626c5289-ae23-0410-ae9c-e8d60b6d4f22 --- SWIG/Lib/perl5/perlrun.swg | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SWIG/Lib/perl5/perlrun.swg b/SWIG/Lib/perl5/perlrun.swg index 80ade30b4..1911a5258 100644 --- a/SWIG/Lib/perl5/perlrun.swg +++ b/SWIG/Lib/perl5/perlrun.swg @@ -46,7 +46,7 @@ /* Error manipulation */ #define SWIG_ErrorType(code) SWIG_Perl_ErrorType(code) -#define SWIG_Error(code, msg) warn("%s %s\n", SWIG_ErrorType(code), msg) +#define SWIG_Error(code, msg) sv_setpvf(GvSV(PL_errgv),"%s %s\n", SWIG_ErrorType(code), msg) #define SWIG_fail goto fail /* Perl-specific SWIG API */