From: simonpj <unknown>
Date: Fri, 11 Oct 2002 14:33:58 +0000 (+0000)
Subject: [project @ 2002-10-11 14:33:58 by simonpj]
X-Git-Tag: nhc98-1-18-release~816
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;ds=sidebyside;h=dce1f7d375ddf22fc17ef98734a8ee6e302b1a45;p=ghc-base.git

[project @ 2002-10-11 14:33:58 by simonpj]
Fix cpp syntax
---

diff --git a/Foreign/Marshal/Alloc.hs b/Foreign/Marshal/Alloc.hs
index 900c917..b0e528b 100644
--- a/Foreign/Marshal/Alloc.hs
+++ b/Foreign/Marshal/Alloc.hs
@@ -42,7 +42,7 @@ import GHC.Real
 import GHC.Ptr
 import GHC.Err
 import GHC.Base
-#elsif defined(__HUGS__)
+#elif defined(__HUGS__)
 import Control.Exception	( bracket )
 #else
 import System.IO		( bracket )