From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Sat, 27 Dec 2008 08:26:09 +0000 (+0100)
Subject: Remove "b" flag for sv_utf8_upgrade_nomg in embed.fnc
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6a71721dfccd239c818c4403e1d0f62568633088;p=p5sagit%2Fp5-mst-13.2.git

Remove "b" flag for sv_utf8_upgrade_nomg in embed.fnc

This is only a macro, without a Perl_ implementation.
Hopefully this fixes the Win32 build.
---

diff --git a/embed.fnc b/embed.fnc
index a926a53..cc3cf79 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1257,7 +1257,7 @@ AmdbR	|char*	|sv_pv		|NN SV *sv
 AmdbR	|char*	|sv_pvutf8	|NN SV *sv
 AmdbR	|char*	|sv_pvbyte	|NN SV *sv
 Amdb	|STRLEN	|sv_utf8_upgrade|NN SV *sv
-Amdb	|STRLEN	|sv_utf8_upgrade_nomg|NN SV *sv
+Amd	|STRLEN	|sv_utf8_upgrade_nomg|NN SV *sv
 ApdM	|bool	|sv_utf8_downgrade|NN SV *const sv|const bool fail_ok
 Apd	|void	|sv_utf8_encode |NN SV *const sv
 ApdM	|bool	|sv_utf8_decode |NN SV *const sv
diff --git a/global.sym b/global.sym
index 9598d52..fe26578 100644
--- a/global.sym
+++ b/global.sym
@@ -663,7 +663,6 @@ Perl_sv_pv
 Perl_sv_pvutf8
 Perl_sv_pvbyte
 Perl_sv_utf8_upgrade
-Perl_sv_utf8_upgrade_nomg
 Perl_sv_utf8_downgrade
 Perl_sv_utf8_encode
 Perl_sv_utf8_decode
diff --git a/proto.h b/proto.h
index 06e305b..62ddce4 100644
--- a/proto.h
+++ b/proto.h
@@ -3969,7 +3969,7 @@ PERL_CALLCONV void	Perl_reginitcolors(pTHX);
 #define PERL_ARGS_ASSERT_SV_UTF8_UPGRADE	\
 	assert(sv)
 
-/* PERL_CALLCONV STRLEN	Perl_sv_utf8_upgrade_nomg(pTHX_ SV *sv)
+/* PERL_CALLCONV STRLEN	sv_utf8_upgrade_nomg(pTHX_ SV *sv)
 			__attribute__nonnull__(pTHX_1); */
 #define PERL_ARGS_ASSERT_SV_UTF8_UPGRADE_NOMG	\
 	assert(sv)