From 7a1cac81c7f451e11171b7af88d3a816c290dd61 Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Sat, 28 Nov 1998 22:30:38 +0000 Subject: 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 --- scope.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'scope.c') 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", -- cgit v1.2.1