diff options
| author | Mark P Lutz <tecmpl1@triton.ca.boeing.com> | 2000-04-14 20:21:00 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-04-24 19:09:06 +0000 |
| commit | 8bda1795263a5b700b86a63303514e5d538dd644 (patch) | |
| tree | f22acaed7cb6135d27213abfffd2486208bcccf4 /pp.c | |
| parent | 92d29cee5ff815b05b81b877528e4c77e73881c9 (diff) | |
| download | perl-8bda1795263a5b700b86a63303514e5d538dd644.tar.gz | |
Various Unicos 10.0.0.6 fixes.
Subject: [ID 20000414.007] Test suite failures in perl 5.6 on Cray T90
Reply-To: tecmpl1@triton.ca.boeing.com
To: perl5-porters@perl.org
Message-Id: <200004142021.UAA36232@triton.ca.boeing.com>
p4raw-id: //depot/cfgperl@5940
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -4743,10 +4743,14 @@ PP(pp_pack) DIE(aTHX_ "Cannot compress negative numbers"); if ( -#ifdef CXUX_BROKEN_CONSTANT_CONVERT - adouble <= UV_MAX_cxux +#if UVSIZE > 4 && UVSIZE >= NVSIZE + adouble <= 0xffffffff #else +# ifdef CXUX_BROKEN_CONSTANT_CONVERT + adouble <= UV_MAX_cxux +# else adouble <= UV_MAX +# endif #endif ) { |