summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-10-12 11:24:15 +0100
committerNicholas Clark <nick@ccl4.org>2009-10-12 11:24:15 +0100
commit4b8c6c21cda3d9cbafb72eda661edc9052aa2cec (patch)
tree9ccb458342c2d75711d03ccdfbbb14b3209d7c1f /embed.fnc
parentf8279d106847c47fc5a4092b27d4f24faffd84cd (diff)
downloadperl-4b8c6c21cda3d9cbafb72eda661edc9052aa2cec.tar.gz
deprecate_old() is not public, and only used within toke.c, so can be static.
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc5
1 files changed, 3 insertions, 2 deletions
diff --git a/embed.fnc b/embed.fnc
index 866363dd3e..c76f0e72da 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -215,8 +215,9 @@ Anp |char* |delimcpy |NN char* to|NN const char* toend|NN const char* from \
pM |void |delete_eval_scope
: Used in various files
p |void |deprecate |NN const char *const s
-: Used in various files
-p |void |deprecate_old |NN const char *const s
+#if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT)
+s |void |deprecate_old |NN const char *const s
+#endif
Afp |OP* |die |NULLOK const char* pat|...
#if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
s |OP* |vdie |NULLOK const char* pat|NULLOK va_list* args