diff options
| author | Ian Lynagh <igloo@earth.li> | 2009-02-06 22:31:19 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2009-02-06 22:31:19 +0000 |
| commit | 8fd6a1efca90be81dc97a679bf430aaffecc568d (patch) | |
| tree | a6b16303226e580a7d04449643b218075faa2698 /compiler | |
| parent | e28dc9b9e45ff351a5e40fd4de9d0fc746540526 (diff) | |
| download | haskell-8fd6a1efca90be81dc97a679bf430aaffecc568d.tar.gz | |
Fix calling maths functions when compiling via C
Diffstat (limited to 'compiler')
| -rw-r--r-- | compiler/cmm/PprC.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs index 04aa9e90ca..3ee3738e7b 100644 --- a/compiler/cmm/PprC.hs +++ b/compiler/cmm/PprC.hs @@ -253,7 +253,8 @@ pprStmt stmt = case stmt of ) in (fun_proto lbl, myCall) _ -> - (empty {- no proto -}, cast_fn) + (empty {- no proto -}, + pprCall cast_fn cconv results args safety <> semi) -- for a dynamic call, no declaration is necessary. CmmCall (CmmPrim op) results args safety _ret -> |