summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-10-13 11:05:49 +0100
committerNicholas Clark <nick@ccl4.org>2009-10-13 11:08:06 +0100
commit2acdbac104deb9113282247f3dbee83c4705a525 (patch)
treebd905a0581a100f9ed3571004a781c65cb10bfef /toke.c
parent8290c3237cb4f93c9895ceba724c626dd529346f (diff)
downloadperl-2acdbac104deb9113282247f3dbee83c4705a525.tar.gz
Replace Perl_deprecate() with a macro that calls Perl_ck_warner()
Perl_deprecate was not part of the public API, and did not have a deprecate() shortcut macro defined without -DPERL_CORE. Neither codesearch.google.com nor CPAN::Unpack show any users outside the core.
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c12
1 files changed, 0 insertions, 12 deletions
diff --git a/toke.c b/toke.c
index dc87f278db..0b4ff5c06a 100644
--- a/toke.c
+++ b/toke.c
@@ -591,18 +591,6 @@ S_feature_is_enabled(pTHX_ const char *const name, STRLEN namelen)
}
/*
- * Perl_deprecate
- */
-
-void
-Perl_deprecate(pTHX_ const char *const s)
-{
- PERL_ARGS_ASSERT_DEPRECATE;
-
- Perl_ck_warner(aTHX_ packWARN(WARN_DEPRECATED), "Use of %s is deprecated", s);
-}
-
-/*
* experimental text filters for win32 carriage-returns, utf16-to-utf8 and
* utf16-to-utf8-reversed.
*/