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