From: Malcolm.Wallace@cs.york.ac.uk <unknown>
Date: Mon, 4 Aug 2008 16:03:19 +0000 (+0000)
Subject: zipWithM_ comes from Control.Monad
X-Git-Tag: 6_10_branch_has_been_forked~91
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9d2b4496f66e026434d60000b7398ae18c5a0044;p=ghc-base.git

zipWithM_ comes from Control.Monad
---

diff --git a/Foreign/Marshal/Array.hs b/Foreign/Marshal/Array.hs
index a3d9d16..ce28ddb 100644
--- a/Foreign/Marshal/Array.hs
+++ b/Foreign/Marshal/Array.hs
@@ -73,6 +73,8 @@ import GHC.Num
 import GHC.List
 import GHC.Err
 import GHC.Base
+#else
+import Control.Monad (zipWithM_)
 #endif
 
 -- allocation