diff options
| author | Ben Lippmeier <benl@ouroborus.net> | 2013-11-06 13:05:52 +1100 |
|---|---|---|
| committer | Ben Lippmeier <benl@ouroborus.net> | 2013-11-14 12:57:05 +1100 |
| commit | cb8935d2b39ab1c8913152679828ac11f98bf424 (patch) | |
| tree | f2111989418af49986d1dede329cf2253a4a3c87 /compiler/llvmGen/Llvm | |
| parent | bed118a43019e02ca0bc763fa6e41845b1deb21f (diff) | |
| download | haskell-cb8935d2b39ab1c8913152679828ac11f98bf424.tar.gz | |
Fix bug in LLVM code generator
The bitcast operation always needs a type for the source.
Diffstat (limited to 'compiler/llvmGen/Llvm')
| -rw-r--r-- | compiler/llvmGen/Llvm/PpLlvm.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/compiler/llvmGen/Llvm/PpLlvm.hs b/compiler/llvmGen/Llvm/PpLlvm.hs index fca1a7cd4d..b8343ceff3 100644 --- a/compiler/llvmGen/Llvm/PpLlvm.hs +++ b/compiler/llvmGen/Llvm/PpLlvm.hs @@ -344,7 +344,11 @@ ppStore val dst ppCast :: LlvmCastOp -> LlvmVar -> LlvmType -> SDoc -ppCast op from to = ppr op <+> ppr from <+> text "to" <+> ppr to +ppCast op from to + = ppr op + <+> ppr (getVarType from) <+> ppName from + <+> text "to" + <+> ppr to ppMalloc :: LlvmType -> Int -> SDoc |