From: Rafael Garcia-Suarez <rgs@consttype.org>
Date: Tue, 4 May 2010 13:13:44 +0000 (+0200)
Subject: Fix parameter name for die_unwind() in embed.fnc
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=62705b21e05c097bbaecf3ca91f129dc5855ce77;p=p5sagit%2Fp5-mst-13.2.git

Fix parameter name for die_unwind() in embed.fnc
---

diff --git a/embed.fnc b/embed.fnc
index 1612fe7..4f3ee7d 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -290,7 +290,7 @@ pM	|void	|delete_eval_scope
 Apd	|OP*	|die_sv		|NN SV *baseex
 Afpd	|OP*	|die		|NULLOK const char* pat|...
 : Used in util.c
-pr	|void	|die_unwind	|NN SV* ex
+pr	|void	|die_unwind	|NN SV* msv
 Ap	|void	|dounwind	|I32 cxix
 : FIXME
 pmb	|bool	|do_aexec	|NULLOK SV* really|NN SV** mark|NN SV** sp
diff --git a/proto.h b/proto.h
index 2593a1c..ce76039 100644
--- a/proto.h
+++ b/proto.h
@@ -537,11 +537,11 @@ PERL_CALLCONV OP*	Perl_die_sv(pTHX_ SV *baseex)
 PERL_CALLCONV OP*	Perl_die(pTHX_ const char* pat, ...)
 			__attribute__format__null_ok__(__printf__,pTHX_1,pTHX_2);
 
-PERL_CALLCONV void	Perl_die_unwind(pTHX_ SV* ex)
+PERL_CALLCONV void	Perl_die_unwind(pTHX_ SV* msv)
 			__attribute__noreturn__
 			__attribute__nonnull__(pTHX_1);
 #define PERL_ARGS_ASSERT_DIE_UNWIND	\
-	assert(ex)
+	assert(msv)
 
 PERL_CALLCONV void	Perl_dounwind(pTHX_ I32 cxix);
 /* PERL_CALLCONV bool	Perl_do_aexec(pTHX_ SV* really, SV** mark, SV** sp)