[project @ 2003-10-21 14:32:43 by sof]

appease the GHC bigwigs

diff --git a/Text/Regex.hs b/Text/Regex.hs
index 8ba4eae..94c5c58 100644 (file)
--- a/Text/Regex.hs
+++ b/Text/Regex.hs
@@ -17,7 +17,7 @@
 module Text.Regex (
     -- * Regular expressions
     Regex,
-#if defined(HAVE_REGEX_H)
+#if !defined(__HUGS__) || defined(HAVE_REGEX_H)
     mkRegex,
     mkRegexWithOpts,
     matchRegex,
@@ -30,7 +30,7 @@ import qualified Text.Regex.Posix as RE
 import Text.Regex.Posix ( Regex )
 import System.IO.Unsafe
 
-#if defined(HAVE_REGEX_H)
+#if !defined(__HUGS__) || defined(HAVE_REGEX_H)
 -- | Makes a regular expression with the default options (multi-line,
 -- case-sensitive).  The syntax of regular expressions is
 -- otherwise that of @egrep@ (i.e. POSIX \"extended\" regular

diff --git a/Text/Regex/Posix.hsc b/Text/Regex/Posix.hsc
index 9b4d706..56544e1 100644 (file)
--- a/Text/Regex/Posix.hsc
+++ b/Text/Regex/Posix.hsc
@@ -19,7 +19,7 @@ module Text.Regex.Posix (
        -- * The @Regex@ type
        Regex,          -- abstract
 
-#if defined(HAVE_REGEX_H)
+#if !defined(__HUGS__) || defined(HAVE_REGEX_H)
        -- * Compiling a regular expression
        regcomp,        -- :: String -> Int -> IO Regex
 
@@ -39,7 +39,7 @@ module Text.Regex.Posix (
 #endif
   ) where
 
-#if defined(HAVE_REGEX_H)
+#if !defined(__HUGS__) || defined(HAVE_REGEX_H)
 #include <sys/types.h>
 #include "regex.h"
 #endif
@@ -54,7 +54,7 @@ type CRegex    = ()
 -- | A compiled regular expression
 newtype Regex = Regex (ForeignPtr CRegex)
 
-#if defined(HAVE_REGEX_H) 
+#if !defined(__HUGS__) || defined(HAVE_REGEX_H)
 -- to the end
 -- -----------------------------------------------------------------------------
 -- regcomp