From: wolfgang <unknown>
Date: Sat, 29 Jan 2005 16:10:27 +0000 (+0000)
Subject: [project @ 2005-01-29 16:10:27 by wolfgang]
X-Git-Tag: nhc98-1-18-release~57
X-Git-Url: http://git.megacz.com/?p=ghc-base.git;a=commitdiff_plain;h=de2b563a240bafc20b656729d1ecde0c890d22da

[project @ 2005-01-29 16:10:27 by wolfgang]
import CString on non-windows platforms.
---

diff --git a/Debug/Trace.hs b/Debug/Trace.hs
index 7c9295f..5bc7128 100644
--- a/Debug/Trace.hs
+++ b/Debug/Trace.hs
@@ -22,10 +22,8 @@ import Prelude
 import System.IO.Unsafe
 
 #ifdef __GLASGOW_HASKELL__
-#ifdef mingw32_HOST_OS
 import Foreign.C.String
 #endif
-#endif
 
 -- | 'putTraceMsg' function outputs the trace message from IO monad.
 -- Usually the output stream is 'stderr' but if the function is called