diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-29 05:01:54 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-29 05:01:54 +0000 |
commit | 17c3b45099488fbc22dc1d4e0e4600c17bc12645 (patch) | |
tree | d3f866944ed1ba0c3b916fa245466d83f4e77fe8 /scope.c | |
parent | 1d2dff63f533f62282a700198c67c41dcb6ad6df (diff) | |
download | perl-17c3b45099488fbc22dc1d4e0e4600c17bc12645.tar.gz |
[win32] misc changes
- remove code that works around lack of I_STDARG (we're a happy ANSI family)
- leave dump_foo() stubs when not -DDEBUGGING for consistent symbol exports
p4raw-id: //depot/win32/perl@1053
Diffstat (limited to 'scope.c')
-rw-r--r-- | scope.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -803,11 +803,10 @@ leave_scope(I32 base) } } -#ifdef DEBUGGING - void cx_dump(PERL_CONTEXT *cx) { +#ifdef DEBUGGING dTHR; PerlIO_printf(Perl_debug_log, "CX %ld = %s\n", (long)(cx - cxstack), block_type[cx->cx_type]); if (cx->cx_type != CXt_SUBST) { @@ -896,5 +895,5 @@ cx_dump(PERL_CONTEXT *cx) (long)cx->sb_rxres); break; } +#endif /* DEBUGGING */ } -#endif |