From eb5ebe98ecbfd0e8a4781d45832910bbb5c09f1c Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 24 Mar 2005 09:19:52 +0000
Subject: [PATCH 1/1] [project @ 2005-03-24 09:19:52 by simonmar]
 __hscore_getFolderPath is ccall, not stdcall.

---
 System/Directory.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/System/Directory.hs b/System/Directory.hs
index cafe759..8db9686 100644
--- a/System/Directory.hs
+++ b/System/Directory.hs
@@ -954,7 +954,7 @@ getTemporaryDirectory = do
 #endif
 
 #if __GLASGOW_HASKELL__ && defined(mingw32_HOST_OS)
-foreign import stdcall unsafe "dirUtils.h __hscore_getFolderPath"
+foreign import ccall unsafe "__hscore_getFolderPath"
             c_SHGetFolderPath :: Ptr () 
                               -> CInt 
                               -> Ptr () 
-- 
1.7.10.4