[project @ 2003-02-08 20:14:19 by wolfgang]

PowerPC: for ccalls, use the correct minimum size (32 bytes) for the
parameter area

ghc/compiler/nativeGen/MachCode.lhs

@@ -3473,7 +3473,7 @@ genCCall fn cconv kind args
 	(argReps,argCodes,vregs) = unzip3 preppedArgs
 
 	    -- size of linkage area + size of arguments, in bytes
-	stackDelta = roundTo16 $ (24 +) $ (4 *) $ sum $ map getPrimRepSize argReps
+	stackDelta = roundTo16 $ (24 +) $ max 32 $ (4 *) $ sum $ map getPrimRepSize argReps
 	roundTo16 x | x `mod` 16 == 0 = x
 		    | otherwise = x + 16 - (x `mod` 16)