[project @ 2002-02-14 14:08:50 by simonmar]
authorsimonmar <unknown>
Thu, 14 Feb 2002 14:08:50 +0000 (14:08 +0000)
committersimonmar <unknown>
Thu, 14 Feb 2002 14:08:50 +0000 (14:08 +0000)
Catch up with changes to the foreign import syntax.

Text/Regex/Posix.hsc

index 414a5c1..8df4331 100644 (file)
@@ -8,7 +8,7 @@
 -- Stability   :  experimental
 -- Portability :  non-portable (only on platforms that provide POSIX regexps)
 --
--- $Id: Posix.hsc,v 1.4 2002/02/13 11:52:42 simonmar Exp $
+-- $Id: Posix.hsc,v 1.5 2002/02/14 14:08:50 simonmar Exp $
 --
 -- Interface to the POSIX regular expression library.
 -- ToDo: should have an interface using PackedStrings.
@@ -145,12 +145,12 @@ unpack string p_match = do
 type CRegex    = ()
 type CRegMatch = ()
 
-foreign import "regcomp" unsafe
+foreign import ccall unsafe "regcomp"
   c_regcomp :: Ptr CRegex -> CString -> CInt -> IO CInt
 
-foreign import "regfree" unsafe
+foreign import ccall  unsafe "regfree"
   c_regfree :: Ptr CRegex -> IO ()
 
-foreign import "regexec" unsafe
+foreign import ccall unsafe "regexec"
   c_regexec :: Ptr CRegex -> CString -> CSize
            -> Ptr CRegMatch -> CInt -> IO CInt