summaryrefslogtreecommitdiff
path: root/deb.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1999-10-27 14:06:44 +0000
committerJarkko Hietaniemi <jhi@iki.fi>1999-10-27 14:06:44 +0000
commit1ae6be1c7649fa55b3105031a58ffe146fa4f2fd (patch)
tree2bdf0dec28a91f5b0e5b8445ed6c203c64e7268a /deb.c
parent10a675193b1a7d3751e2d04a91c294c6be9dfaf7 (diff)
parent2b260de0f3727bc62519897f69d6f752c97d8502 (diff)
downloadperl-1ae6be1c7649fa55b3105031a58ffe146fa4f2fd.tar.gz
Integrate with Sarathy; manual resolve on regcomp.c conflicts
(Ilya's changes won). p4raw-id: //depot/cfgperl@4468
Diffstat (limited to 'deb.c')
-rw-r--r--deb.c12
1 files changed, 0 insertions, 12 deletions
diff --git a/deb.c b/deb.c
index 926b1e6e21..10b52cf49d 100644
--- a/deb.c
+++ b/deb.c
@@ -59,22 +59,10 @@ Perl_vdeb(pTHX_ const char *pat, va_list *args)
SvTYPE(gv) == SVt_PVGV ? SvPVX(GvSV(gv)) : "<free>",
(long)PL_curcop->cop_line);
#endif /* USE_THREADS */
- for (i=0; i<PL_dlevel; i++)
- PerlIO_printf(Perl_debug_log, "%c%c ",PL_debname[i],PL_debdelim[i]);
(void) PerlIO_vprintf(Perl_debug_log, pat, *args);
#endif /* DEBUGGING */
}
-void
-Perl_deb_growlevel(pTHX)
-{
-#ifdef DEBUGGING
- PL_dlmax += 128;
- Renew(PL_debname, PL_dlmax, char);
- Renew(PL_debdelim, PL_dlmax, char);
-#endif /* DEBUGGING */
-}
-
I32
Perl_debstackptrs(pTHX)
{