From: Marcus Holland-Moritz <mhx-perl@gmx.net>
Date: Thu, 29 Apr 2004 17:50:40 +0000 (+0000)
Subject: CXUX_BROKEN_CONSTANT_CONVERT isn't used anymore.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8bbf3450a1ff0a3996dade29a4194cc0939d871f;p=p5sagit%2Fp5-mst-13.2.git

CXUX_BROKEN_CONSTANT_CONVERT isn't used anymore.
Remove all associated code.

p4raw-id: //depot/perl@22753
---

diff --git a/hints/cxux.sh b/hints/cxux.sh
index e3ac086..8d95356 100644
--- a/hints/cxux.sh
+++ b/hints/cxux.sh
@@ -69,10 +69,9 @@ glibpth="/usr/sde/elf/usr/lib $glibpth"
 # to drag 'sigaction' into the perl main program is to make sure it gets
 # defined for the posix shared library (for some reason sigaction is static,
 # rather than being defined in libc.so.1). The 88110compat option makes sure
-# the code will run on both 88100 and 88110 machines. The define is added to
-# trigger a work around for a compiler bug which shows up in pp.c.
+# the code will run on both 88100 and 88110 machines.
 #
-cc='/bin/cc -Xa -Qtarget=M88110compat -DCXUX_BROKEN_CONSTANT_CONVERT'
+cc='/bin/cc -Xa -Qtarget=M88110compat'
 cccdlflags='-Zelf -Zpic'
 ccdlflags='-Zelf -Zlink=dynamic -Wl,-Bexport -u sigaction'
 lddlflags='-Zlink=so'
diff --git a/pp_pack.c b/pp_pack.c
index 5183eaf..784d16e 100644
--- a/pp_pack.c
+++ b/pp_pack.c
@@ -21,17 +21,6 @@
 #include "perl.h"
 
 /*
- * The compiler on Concurrent CX/UX systems has a subtle bug which only
- * seems to show up when compiling pp.c - it generates the wrong double
- * precision constant value for (double)UV_MAX when used inline in the body
- * of the code below, so this makes a static variable up front (which the
- * compiler seems to get correct) and uses it in place of UV_MAX below.
- */
-#ifdef CXUX_BROKEN_CONSTANT_CONVERT
-static double UV_MAX_cxux = ((double)UV_MAX);
-#endif
-
-/*
  * Offset for integer pack/unpack.
  *
  * On architectures where I16 and I32 aren't really 16 and 32 bits,