summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2014-11-26 19:51:23 -0700
committerKarl Williamson <khw@cpan.org>2014-12-09 11:43:32 -0700
commitc536450b09fc53d9fd03b72f6cbd62c89d4fd30f (patch)
treed1a39c466f1d019e0edcc36dd2e94f76a746fbad /perl.c
parente9c9d63a490e3e74156a45e54ee8104fc9c83ebb (diff)
downloadperl-c536450b09fc53d9fd03b72f6cbd62c89d4fd30f.tar.gz
-Dp does work on EBCDIC.
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/perl.c b/perl.c
index a238fb4f84..be9932d27d 100644
--- a/perl.c
+++ b/perl.c
@@ -3060,11 +3060,6 @@ Perl_get_debug_opts(pTHX_ const char **s, bool givehelp)
const char *const *p = usage_msgd;
while (*p) PerlIO_puts(PerlIO_stdout(), *p++);
}
-# ifdef EBCDIC
- if ((i & DEBUG_p_FLAG) && ckWARN_d(WARN_DEBUGGING))
- Perl_warner(aTHX_ packWARN(WARN_DEBUGGING),
- "-Dp not implemented on this platform\n");
-# endif
return i;
}
#endif