Add some &&s to configure
[ghc-hetmet.git] / compiler / codeGen / CgCallConv.hs
index 29441d6..351375d 100644 (file)
@@ -64,7 +64,7 @@ import Data.Bits
 -------------------------------------------------------------------------
 
 -- bring in ARG_P, ARG_N, etc.
-#include "../includes/StgFun.h"
+#include "../includes/rts/storage/FunTypes.h"
 
 -------------------------
 argDescrType :: ArgDescr -> StgHalfWord
@@ -408,7 +408,6 @@ allDoubleRegNos      = regList mAX_Double_REG
 allLongRegNos   = regList mAX_Long_REG
 
 regList :: Int -> [Int]
-regList 0 = []
 regList n = [1 .. n]
 
 type AvailRegs = ( [Int]   -- available vanilla regs.