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

On branch  : master

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

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

commit a70e45f5d28449698677cc165ec09bf6151078a4
Author: Simon Marlow <marlo...@gmail.com>
Date:   Fri Nov 16 14:03:49 2012 +0000

    C backend: ignore MO_Touch

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

 compiler/cmm/PprC.hs |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs
index 4e73ade..ed99855 100644
--- a/compiler/cmm/PprC.hs
+++ b/compiler/cmm/PprC.hs
@@ -230,6 +230,8 @@ pprStmt stmt =
                     pprCall cast_fn cconv hresults hargs <> semi)
                         -- for a dynamic call, no declaration is necessary.
 
+    CmmUnsafeForeignCall (PrimTarget MO_Touch) _results _args -> empty
+
     CmmUnsafeForeignCall target@(PrimTarget op) results args ->
         proto $$ fn_call
       where



_______________________________________________
Cvs-ghc mailing list
Cvs-ghc@haskell.org
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to