diff options
| author | Graham Barr <gbarr@pobox.com> | 1998-10-24 16:45:50 -0500 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-10-25 08:39:25 +0000 |
| commit | 9cc2fdd394015171a9ffc8bf66f62a26748f2a22 (patch) | |
| tree | ceff6dcd6b85f9006167dc9047c9e7d04eeab632 /pp_ctl.c | |
| parent | b23a5f78ac194f96460ff70d7f7de145efd51801 (diff) | |
| download | perl-9cc2fdd394015171a9ffc8bf66f62a26748f2a22.tar.gz | |
Re: die with a reference should use overload "" operator
Message-ID: <19981024214550.C508@pobox.com>
p4raw-id: //depot/perl@2077
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -1227,6 +1227,8 @@ die_where(char *message) return pop_return(); } } + if (!message) + message = SvPVx(ERRSV, PL_na); PerlIO_printf(PerlIO_stderr(), "%s",message); PerlIO_flush(PerlIO_stderr()); my_failure_exit(); |