summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorAndy Dougherty <doughera@lafayette.edu>1998-04-14 09:04:58 -0400
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1998-05-14 15:09:51 +0000
commitc4f23d77f4b3486a36335c4460cbfd4e81e37892 (patch)
treec0a1326984d277a8c25f70e7f81765e8a96dcf11 /perl.h
parent13c745c007f7ab4c05f0dd76e12e5a70c8c0e95b (diff)
downloadperl-c4f23d77f4b3486a36335c4460cbfd4e81e37892.tar.gz
[PATCH for 5.004_64] Configure patch Config_64-01
Date: Tue, 14 Apr 1998 13:04:58 -0400 (EDT) Subject: [PATCH for 5.004_64] Configure patch Config_64-01-02.diff Date: Fri, 17 Apr 1998 11:01:13 -0400 (EDT) Subject: [PATCH for 5.004_64] Configure patch Config_64-02-03.diff Date: Thu, 23 Apr 1998 15:03:20 -0400 (EDT) Subject: [PATCH 5.004_64] Config_64-03-04.diff Date: Wed, 13 May 1998 14:33:30 -0400 (EDT) p4raw-id: //depot/perl@948
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h13
1 files changed, 11 insertions, 2 deletions
diff --git a/perl.h b/perl.h
index cd0f2bb11c..64cd4ce4da 100644
--- a/perl.h
+++ b/perl.h
@@ -91,7 +91,7 @@ register struct op *op asm(stringify(OP_IN_REGISTER));
#define SOFT_CAST(type) (type)
#endif
-#ifndef BYTEORDER
+#ifndef BYTEORDER /* Should never happen -- byteorder is in config.h */
# define BYTEORDER 0x1234
#endif
@@ -695,12 +695,21 @@ Free_t Perl_free _((Malloc_t where));
# ifdef convex
# define Quad_t long long
# else
-# if BYTEORDER > 0xFFFF
+# if LONGSIZE == 8
# define Quad_t long
# endif
# endif
#endif
+/* XXX Experimental set-up for long long. Just add -DUSE_LONG_LONG
+ to your ccflags. --Andy Dougherty 4/1998
+*/
+#ifdef USE_LONG_LONG
+# if defined(HAS_LONG_LONG) && LONGLONGSIZE == 8
+# define Quad_t long long
+# endif
+#endif
+
#ifdef Quad_t
# define HAS_QUAD
typedef Quad_t IV;