From: sof Date: Tue, 21 Oct 2003 14:32:44 +0000 (+0000) Subject: [project @ 2003-10-21 14:32:43 by sof] X-Git-Tag: nhc98-1-18-release~461 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=0273bb733acbdb522691a9d3f6f8a46305480a11;p=haskell-directory.git [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 --- 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 --- 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 #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