pspp-dev
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: pspp rc4 on Mac: pfm-write errors


From: Ben Pfaff
Subject: Re: pspp rc4 on Mac: pfm-write errors
Date: Mon, 25 Jul 2005 20:45:06 -0700
User-agent: Gnus/5.1007 (Gnus v5.10.7) Emacs/21.4 (gnu/linux)

"Marshall DeBerry" <address@hidden> writes:

> It's gcc 4.0 for the Mac--I'll give your suggestion a try

Does it make any difference if you apply the following patch?

(Although I like John's suggestion, I'd rather not have to advise
people to use particular compiler flags if possible.)

cd /home/blp/pspp/testing/src/
diff -up /home/blp/pspp/testing/src/pfm-write.c\~ 
/home/blp/pspp/testing/src/pfm-write.c
--- /home/blp/pspp/testing/src/pfm-write.c~     2005-07-25 20:43:24.019693056 
-0700
+++ /home/blp/pspp/testing/src/pfm-write.c      2005-07-25 20:43:48.189018760 
-0700
@@ -416,14 +416,14 @@ pfm_close_writer (struct pfm_writer *w)
 
 /* Conversion base. */
 #define BASE 30                         /* As an integer. */
-#define LDBASE ((long double) BASE)     /* As a long double. */
+#define LDBASE 30.0L                    /* As a long double. */
 
 /* This is floor(log30(2**31)), the minimum number of trigesimal
    digits that a `long int' can hold. */
 #define CHUNK_SIZE 6                    
 
 /* Yields the square of X. */
-#define Q(X) ((X) * (X))
+#define Q(X) X * X
 
 /* Returns 30**EXPONENT, for 0 <= EXPONENT <= log30(DBL_MAX). */
 static long double

Diff finished at Mon Jul 25 20:44:13

-- 
Ben Pfaff 
email: address@hidden
web: http://benpfaff.org




reply via email to

[Prev in Thread] Current Thread [Next in Thread]