X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FMachRegs.h;h=d6075326db47eb88b3970ccb79d14f460076dfca;hb=d1c9e5aaf9f032ad9c4b123499bdd948c2fe9e47;hp=593989dd6aa0809875c542d30f088ff6d77919d7;hpb=456dc6d6c193f693661409609dc28d5ad9d8c984;p=ghc-hetmet.git

diff --git a/includes/MachRegs.h b/includes/MachRegs.h
index 593989d..d607532 100644
--- a/includes/MachRegs.h
+++ b/includes/MachRegs.h
@@ -655,8 +655,15 @@
 #define REG_F2	    	f23
 #define REG_F3	    	f24
 #define REG_F4	    	f25
+
+/* for each of the double arg regs, 
+   Dn_2 is the high half. */
+   
 #define REG_D1	    	f2
+#define REG_D1_2	f3
+
 #define REG_D2	    	f4
+#define REG_D2_2	f5
 
 #define REG_Sp    	i0
 #define REG_SpLim    	i2