diff options
| author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2004-03-08 22:49:55 +0100 |
|---|---|---|
| committer | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2004-03-09 18:41:15 +0000 |
| commit | 6b75d741eabd2f8d29b97270b6ce80b236b12a26 (patch) | |
| tree | 00b3351cca22f370d0f736da5f48651ddd107c48 /pp_ctl.c | |
| parent | 6aa2f6a7a4e2a0d061a689b227dcf063d93806a6 (diff) | |
| download | perl-6b75d741eabd2f8d29b97270b6ce80b236b12a26.tar.gz | |
Re: undef and the range operator
Message-Id: <20040308214955.3d8be3a6@r2d2>
p4raw-id: //depot/perl@22472
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1056,6 +1056,7 @@ PP(pp_flip) an exception for .."0" [#18165]). AMS 20021031. */ #define RANGE_IS_NUMERIC(left,right) ( \ + (!SvOK(left) && !SvOK(right)) || \ SvNIOKp(left) || (SvOK(left) && !SvPOKp(left)) || \ SvNIOKp(right) || (SvOK(right) && !SvPOKp(right)) || \ (((!SvOK(left) && SvOK(right)) || (looks_like_number(left) && \ |