From 9d2b4496f66e026434d60000b7398ae18c5a0044 Mon Sep 17 00:00:00 2001
From: "Malcolm.Wallace@cs.york.ac.uk" <unknown>
Date: Mon, 4 Aug 2008 16:03:19 +0000
Subject: [PATCH] zipWithM_ comes from Control.Monad

---
 Foreign/Marshal/Array.hs |    2 ++
 1 file changed, 2 insertions(+)

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
-- 
1.7.10.4