-mAX_Real_Vanilla_REG = (MAX_REAL_VANILLA_REG :: Int)
-mAX_Real_Float_REG = (MAX_REAL_FLOAT_REG :: Int)
-mAX_Real_Double_REG = (MAX_REAL_DOUBLE_REG :: Int)
+mAX_Long_REG :: Int
+mAX_Long_REG = MAX_LONG_REG
+
+mAX_Real_Vanilla_REG :: Int
+mAX_Real_Vanilla_REG = MAX_REAL_VANILLA_REG
+
+mAX_Real_Float_REG :: Int
+mAX_Real_Float_REG = MAX_REAL_FLOAT_REG
+
+mAX_Real_Double_REG :: Int
+mAX_Real_Double_REG = MAX_REAL_DOUBLE_REG
+
+mAX_Real_Long_REG :: Int