summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2002-01-03 23:04:00 +0100
committerAbhijit Menon-Sen <ams@wiw.org>2002-01-04 03:27:44 +0000
commitac206dc8afc56c3af5eccaed5ba83dda4e594b6e (patch)
treed973c34991517a76cf31a022c4ed9556dbca333d /toke.c
parentd8f6a7325d6b2ec46e8cdc1ec4b5e1ad4a86abd0 (diff)
downloadperl-ac206dc8afc56c3af5eccaed5ba83dda4e594b6e.tar.gz
warn if not CORE::dump
Message-Id: <20020103220400.A13958@rafael> p4raw-id: //depot/perl@14053
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/toke.c b/toke.c
index de71ceebed..6f06daa87f 100644
--- a/toke.c
+++ b/toke.c
@@ -3813,6 +3813,10 @@ Perl_yylex(pTHX)
}
else { /* no override */
tmp = -tmp;
+ if (tmp == KEY_dump && ckWARN(WARN_MISC)) {
+ Perl_warner(aTHX_ WARN_MISC,
+ "dump() better written as CORE::dump()");
+ }
gv = Nullgv;
gvp = 0;
if (ckWARN(WARN_AMBIGUOUS) && hgv