summaryrefslogtreecommitdiff
path: root/embed.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-09-12 00:09:18 +0000
committerNicholas Clark <nick@ccl4.org>2007-09-12 00:09:18 +0000
commit4befac30287793f3de4eeec4608be8e6a4c07763 (patch)
treea60e146d619a442286ecd039b80283c7e52b18cc /embed.h
parentaab9a3b697e77c80c3ac8b3db60730d246a5fbf5 (diff)
downloadperl-4befac30287793f3de4eeec4608be8e6a4c07763.tar.gz
mro_get_linear_isa_dfs and mro_get_linear_isa_c3 can have static
linkage. p4raw-id: //depot/perl@31849
Diffstat (limited to 'embed.h')
-rw-r--r--embed.h16
1 files changed, 12 insertions, 4 deletions
diff --git a/embed.h b/embed.h
index 029d29da00..6aaaf8acf4 100644
--- a/embed.h
+++ b/embed.h
@@ -1911,8 +1911,12 @@
#endif
#endif
#define mro_get_linear_isa Perl_mro_get_linear_isa
-#define mro_get_linear_isa_c3 Perl_mro_get_linear_isa_c3
-#define mro_get_linear_isa_dfs Perl_mro_get_linear_isa_dfs
+#if defined(PERL_IN_MRO_C) || defined(PERL_DECL_PROT)
+#ifdef PERL_CORE
+#define mro_get_linear_isa_c3 S_mro_get_linear_isa_c3
+#define mro_get_linear_isa_dfs S_mro_get_linear_isa_dfs
+#endif
+#endif
#ifdef PERL_CORE
#define mro_isa_changed_in Perl_mro_isa_changed_in
#endif
@@ -4207,8 +4211,12 @@
#endif
#endif
#define mro_get_linear_isa(a) Perl_mro_get_linear_isa(aTHX_ a)
-#define mro_get_linear_isa_c3(a,b) Perl_mro_get_linear_isa_c3(aTHX_ a,b)
-#define mro_get_linear_isa_dfs(a,b) Perl_mro_get_linear_isa_dfs(aTHX_ a,b)
+#if defined(PERL_IN_MRO_C) || defined(PERL_DECL_PROT)
+#ifdef PERL_CORE
+#define mro_get_linear_isa_c3(a,b) S_mro_get_linear_isa_c3(aTHX_ a,b)
+#define mro_get_linear_isa_dfs(a,b) S_mro_get_linear_isa_dfs(aTHX_ a,b)
+#endif
+#endif
#ifdef PERL_CORE
#define mro_isa_changed_in(a) Perl_mro_isa_changed_in(aTHX_ a)
#endif