[commit: ghc] master: Fix inverted test for platformUnregisterised (should fix the optllvm breakage) (d4ac7d8)

[Simon Marlow]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/d4ac7d8160b3533c7d0a2377b5442038f69486a8

>---------------------------------------------------------------

commit d4ac7d8160b3533c7d0a2377b5442038f69486a8
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Tue Aug 21 12:48:34 2012 +0100

    Fix inverted test for platformUnregisterised (should fix the optllvm breakage)

>---------------------------------------------------------------

 compiler/llvmGen/LlvmCodeGen/Base.hs |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/llvmGen/LlvmCodeGen/Base.hs b/compiler/llvmGen/LlvmCodeGen/Base.hs
index a9dfebb..77eb845 100644
--- a/compiler/llvmGen/LlvmCodeGen/Base.hs
+++ b/compiler/llvmGen/LlvmCodeGen/Base.hs
@@ -85,8 +85,8 @@ widthToLlvmInt w = LMInt $ widthInBits w
 -- | GHC Call Convention for LLVM
 llvmGhcCC :: DynFlags -> LlvmCallConvention
 llvmGhcCC dflags
- | platformUnregisterised (targetPlatform dflags) = CC_Ncc 10
- | otherwise                                      = CC_Ccc
+ | platformUnregisterised (targetPlatform dflags) = CC_Ccc
+ | otherwise                                      = CC_Ncc 10
 
 -- | Llvm Function type for Cmm function
 llvmFunTy :: DynFlags -> LlvmType