From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 25 Jun 2001 14:13:09 +0000 (+0000)
Subject: Enclose the new symbols in START_EXTERN_C and END_EXTERN_C
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=902f5b583e9be14ccec22bc8e0a20ba88df74a6f;p=p5sagit%2Fp5-mst-13.2.git

Enclose the new symbols in START_EXTERN_C and END_EXTERN_C
for the benefit of C++ compilers, as suggested by Guruprasad.

p4raw-id: //depot/perl@10928
---

diff --git a/embed.pl b/embed.pl
index 4a9176f..9ad4767 100755
--- a/embed.pl
+++ b/embed.pl
@@ -2600,6 +2600,9 @@ s	|void	|xstat		|int
 #if defined(PERL_OBJECT)
 };
 #endif
+
+START_EXTERN_C
+
 Apd	|void	|sv_setsv_flags	|SV* dsv|SV* ssv|I32 flags
 Apd	|void	|sv_catpvn_flags|SV* sv|const char* ptr|STRLEN len|I32 flags
 Apd	|void	|sv_catsv_flags	|SV* dsv|SV* ssv|I32 flags
@@ -2607,3 +2610,6 @@ Apd	|STRLEN	|sv_utf8_upgrade_flags|SV *sv|I32 flags
 Apd	|char*	|sv_pvn_force_flags|SV* sv|STRLEN* lp|I32 flags
 Apd	|char*	|sv_2pv_flags	|SV* sv|STRLEN* lp|I32 flags
 Ap	|char*	|my_atof2	|const char *s|NV* value
+
+END_EXTERN_C
+
diff --git a/proto.h b/proto.h
index 411dcb3..2d6e432 100644
--- a/proto.h
+++ b/proto.h
@@ -1321,6 +1321,9 @@ STATIC void	S_xstat(pTHX_ int);
 #if defined(PERL_OBJECT)
 };
 #endif
+
+START_EXTERN_C
+
 PERL_CALLCONV void	Perl_sv_setsv_flags(pTHX_ SV* dsv, SV* ssv, I32 flags);
 PERL_CALLCONV void	Perl_sv_catpvn_flags(pTHX_ SV* sv, const char* ptr, STRLEN len, I32 flags);
 PERL_CALLCONV void	Perl_sv_catsv_flags(pTHX_ SV* dsv, SV* ssv, I32 flags);
@@ -1328,3 +1331,6 @@ PERL_CALLCONV STRLEN	Perl_sv_utf8_upgrade_flags(pTHX_ SV *sv, I32 flags);
 PERL_CALLCONV char*	Perl_sv_pvn_force_flags(pTHX_ SV* sv, STRLEN* lp, I32 flags);
 PERL_CALLCONV char*	Perl_sv_2pv_flags(pTHX_ SV* sv, STRLEN* lp, I32 flags);
 PERL_CALLCONV char*	Perl_my_atof2(pTHX_ const char *s, NV* value);
+
+END_EXTERN_C
+