From 22cf766063c99241e5f5fc2175a60fc63f7a36f3 Mon Sep 17 00:00:00 2001 From: panne Date: Sat, 21 May 2005 15:12:00 +0000 Subject: [PATCH] [project @ 2005-05-21 15:12:00 by panne] Warning police: Use non-deprecated form of "foreign import" --- ghc/compiler/utils/FastString.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/compiler/utils/FastString.lhs b/ghc/compiler/utils/FastString.lhs index 6b795be..661b89e 100644 --- a/ghc/compiler/utils/FastString.lhs +++ b/ghc/compiler/utils/FastString.lhs @@ -443,7 +443,7 @@ cmpFS (FastString u1# l1# b1#) (FastString u2# l2# b2#) = )) #ifndef __HADDOCK__ -foreign import ccall "ghc_memcmp" unsafe +foreign import ccall unsafe "ghc_memcmp" memcmp :: ByteArray# -> ByteArray# -> Int# -> IO Int #endif -- 1.7.10.4