From ad1f54dfe9bf344934c3dfa7d5a710cfa3d16944 Mon Sep 17 00:00:00 2001 From: ross Date: Wed, 6 Nov 2002 23:47:16 +0000 Subject: [PATCH] [project @ 2002-11-06 23:47:16 by ross] Minor #elif adjustment (__HUGS__ vs __NHC__). --- Foreign/Marshal/Alloc.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Foreign/Marshal/Alloc.hs b/Foreign/Marshal/Alloc.hs index b0e528b..31f96ec 100644 --- a/Foreign/Marshal/Alloc.hs +++ b/Foreign/Marshal/Alloc.hs @@ -42,10 +42,10 @@ import GHC.Real import GHC.Ptr import GHC.Err import GHC.Base -#elif defined(__HUGS__) -import Control.Exception ( bracket ) -#else +#elif defined(__NHC__) import System.IO ( bracket ) +#else +import Control.Exception ( bracket ) #endif -- 1.7.10.4