diff options
| author | Alex Vandiver <alexmv@mit.edu> | 2003-06-04 00:50:10 -0400 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-06-09 18:33:50 +0000 |
| commit | 9eba6a4e52ba202048e3c35bfee453d7de7bd5a4 (patch) | |
| tree | d72d368dabdcd26adc6329d4d1d37a28b5132e98 /lib/perl5db.pl | |
| parent | dd59707a39627e9cd9e0c7726087555c3d16ac97 (diff) | |
| download | perl-9eba6a4e52ba202048e3c35bfee453d7de7bd5a4.tar.gz | |
In the debugger, flush stdout/stderr before the prompt is printed
Subject: Re: [PATCH] Perlbug #15228
Message-Id: <1054716610.21402.45.camel@supox>
p4raw-id: //depot/perl@19725
Diffstat (limited to 'lib/perl5db.pl')
| -rw-r--r-- | lib/perl5db.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl index 7c8507c066..9655956348 100644 --- a/lib/perl5db.pl +++ b/lib/perl5db.pl @@ -1,5 +1,7 @@ package DB; +use IO::Handle; + # Debugger for Perl 5.00x; perl5db.pl patch level: $VERSION = 1.20; $header = "perl5db.pl version $VERSION"; @@ -1269,6 +1271,8 @@ EOP $onetimeDump = undef; $onetimedumpDepth = undef; } elsif ($term_pid == $$) { + STDOUT->flush(); + STDERR->flush(); print $OUT "\n"; } } continue { # CMD: |