X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=rmac.h;h=bba14d71b29bda02c06117f8e2831d10fe010877;hp=d5775cc4f0e0e4a08f23d2fa0fdd05e0ebbc18d4;hb=f3c7d186a15b89c39e360b9cc89545a0d24bd6a4;hpb=cfd001aea60f54e49d9beae0f941c513f45c202b

diff --git a/rmac.h b/rmac.h
index d5775cc..bba14d7 100644
--- a/rmac.h
+++ b/rmac.h
@@ -135,6 +135,7 @@
 // Byteswap crap
 #define BYTESWAP16(x) ((((x) & 0x00FF) << 8) | (((x) & 0xFF00) >> 8))
 #define BYTESWAP32(x) ((((x) & 0x000000FF) << 24) | (((x) & 0x0000FF00) << 8) | (((x) & 0x00FF0000) >> 8) | (((x) & 0xFF000000) >> 24))
+#define BYTESWAP64(x) (BYTESWAP32(x>>32)|BYTESWAP32((x&0xffffffff)<<32))
 #define WORDSWAP32(x) ((((x) & 0x0000FFFF) << 16) | (((x) & 0xFFFF0000) >> 16))
 
 //
@@ -153,7 +154,6 @@
 #define SPACE        ' '		// ASCII space
 #define SLASHCHAR    '/'
 #define SLASHSTRING  "/"
-#define TOKEN        uint32_t	// Assembler token
 #define FNSIZ        128		// Maximum size of a filename
 #define OK           0			// OK return
 #define DEBUG        if (debug)	// Debug conditional
@@ -163,22 +163,38 @@
 #define CREATMASK    0
 
 // Object code formats
-#define ALCYON       0			// Alcyon/DRI C object format
-#define MWC          1			// Mark Williams object format
-#define BSD          2			// BSD object format
-#define ELF          3			// ELF object format
-#define XEX          4			// COM/EXE/XEX/whatever a8 object format
+enum
+{
+ALCYON,				// Alcyon/DRI C object format
+MWC, 				// Mark Williams object format
+BSD, 				// BSD object format
+ELF, 				// ELF object format
+LOD,				// DSP 56001 object format
+P56,				// DSP 56001 object format
+XEX, 				// COM/EXE/XEX/whatever a8 object format
+};
+
+// Assembler token
+#define TOKEN	uint32_t
+
+// Token pointer type is a union because we have 64-bit sized tokens now :-P
+#define TOKENPTR union _tokenptr
+TOKENPTR
+{
+	uint32_t * u32;
+	uint64_t * u64;
+};
 
 // Pointer type that can point to (almost) anything
 #define PTR union _ptr
 PTR
 {
-	uint8_t * cp;				// Char
+	uint8_t *  cp;				// Char
 	uint16_t * wp;				// WORD
 	uint32_t * lp;				// LONG
-	uint32_t lw;				// LONG
-	SYM ** sy;					// SYM
-	TOKEN * tk;					// TOKEN
+	uint32_t   lw;				// LONG
+	SYM **     sy;				// SYM
+	TOKENPTR   tk;				// TOKEN
 };
 
 // Symbol spaces
@@ -194,6 +210,7 @@ PTR
 #define REFERENCED   0x1000		// Symbol has been referenced
 #define EQUATED      0x0800		// Symbol was equated
 #define SDECLLIST    0x0400		// Symbol is on 'sdecl'-order list
+#define FLOAT        0x0200		// Symbol is a floating point value
 
 // Expression spaces, ORed with symbol and expression attributes above
 #define ABS          0x0000		// In absolute space
@@ -208,11 +225,11 @@ PTR
 #define SIZW         0x0002		// .w
 #define SIZL         0x0004		// .l
 #define SIZN         0x0008		// no .(size) specifier
-#define SIZD         0x0010		// .d (quad word or FPU double precision real)
+#define SIZD         0x0010		// .d (FPU double precision real)
 #define SIZS         0x0020		// .s (FPU single precision real)
 #define SIZX         0x0040		// .x (FPU extended precision real)
 #define SIZP         0x0080		// .p (FPU pakced decimal real)
-#define SIZQ         SIZD
+#define SIZQ         0x0100		// .q (quad word)
 
 // RISC register bank definitions (used in extended symbol attributes also)
 #define BANK_N       0x0000		// No register bank specified