From 9d8f40c4d2ff3c9a7ded072d81df73638a8c1d83 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 26 Nov 2008 21:18:58 +0000
Subject: Merge S_is_gv_magical() into Perl_is_gv_magical_sv().

p4raw-id: //depot/perl@34931
---
 embed.fnc | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'embed.fnc')

diff --git a/embed.fnc b/embed.fnc
index 848da462b7..8495b71535 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -385,9 +385,6 @@ pd	|U32	|intro_my
 ApPR	|char*	|instr		|NN const char* big|NN const char* little
 p	|bool	|io_close	|NN IO* io|bool not_implicit
 pR	|OP*	|invert		|NULLOK OP* cmd
-#if defined(PERL_IN_GV_C)
-sdR	|bool	|is_gv_magical	|NN const char *name|STRLEN len|U32 flags
-#endif
 ApR	|I32	|is_lvalue_sub
 ApPR	|U32	|to_uni_upper_lc|U32 c
 ApPR	|U32	|to_uni_title_lc|U32 c
@@ -1904,7 +1901,7 @@ np	|void	|my_swabn	|NN void* ptr|int n
 
 Ap	|GV*	|gv_fetchpvn_flags|NN const char* name|STRLEN len|I32 flags|const svtype sv_type
 Ap	|GV*	|gv_fetchsv|NN SV *name|I32 flags|const svtype sv_type
-dpR	|bool	|is_gv_magical_sv|NN SV *name|U32 flags
+dpR	|bool	|is_gv_magical_sv|NN SV *const name_sv|U32 flags
 
 ApR	|bool	|stashpv_hvname_match|NN const COP *c|NN const HV *hv
 
-- 
cgit v1.2.1