add croak(Nullch) again and propagate exception as needed, please jason, check this one
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8342 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
e7bc3f34de
commit
0641b004b3
1 changed files with 1 additions and 2 deletions
|
|
@ -80,8 +80,7 @@
|
||||||
|
|
||||||
/* raise exception */
|
/* raise exception */
|
||||||
%define %raise(obj, type, desc)
|
%define %raise(obj, type, desc)
|
||||||
sv_setsv(perl_get_sv("@", TRUE), obj);
|
sv_setsv(GvSV(PL_errgv), obj);
|
||||||
croak(Nullch);
|
|
||||||
SWIG_fail %enddef
|
SWIG_fail %enddef
|
||||||
|
|
||||||
/* Include the unified typemap library */
|
/* Include the unified typemap library */
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue