summaryrefslogtreecommitdiff
path: root/scope.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-11-28 22:30:38 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-11-28 22:30:38 +0000
commit7a1cac81c7f451e11171b7af88d3a816c290dd61 (patch)
tree7e5b17ba5eb8815c58c13c43f7cf4b07bce789a7 /scope.c
parentb8d907ad033961f03b3e2cf3e41b4be3381fbed1 (diff)
downloadperl-7a1cac81c7f451e11171b7af88d3a816c290dd61.tar.gz
various tweaks; result passes all tests for normal build on Solaris;
fails two pat.t tests under USE_THREADS; io_poll.t test#3 fails on win32 due to lack of select() that works on non-socket fds p4raw-id: //depot/perl@2377
Diffstat (limited to 'scope.c')
-rw-r--r--scope.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/scope.c b/scope.c
index b6c0c0a811..fadc5dfdb1 100644
--- a/scope.c
+++ b/scope.c
@@ -930,8 +930,8 @@ cx_dump(PERL_CONTEXT *cx)
(long)cx->sb_iters);
PerlIO_printf(Perl_debug_log, "SB_MAXITERS = %ld\n",
(long)cx->sb_maxiters);
- PerlIO_printf(Perl_debug_log, "SB_SAFEBASE = %ld\n",
- (long)cx->sb_safebase);
+ PerlIO_printf(Perl_debug_log, "SB_RFLAGS = %ld\n",
+ (long)cx->sb_rflags);
PerlIO_printf(Perl_debug_log, "SB_ONCE = %ld\n",
(long)cx->sb_once);
PerlIO_printf(Perl_debug_log, "SB_ORIG = %s\n",