{-# LINE 1 "libraries\\Win32\\System\\Win32\\WindowsString\\DebugApi.hsc" #-}
-----------------------------------------------------------------------------

-- |

-- Module      :  System.Win32.WindowsString.DebugApi

-- Copyright   :  (c) Esa Ilari Vuokko, 2006

-- License     :  BSD-style (see the file LICENSE)

--

-- Maintainer  :  Esa Ilari Vuokko <ei@vuokko.info>

-- Stability   :  provisional

-- Portability :  portable

--

-- A collection of FFI declarations for using Windows DebugApi.

--

-----------------------------------------------------------------------------

module System.Win32.WindowsString.DebugApi
    ( module System.Win32.WindowsString.DebugApi
    , module System.Win32.DebugApi
    ) where

import System.Win32.DebugApi.Internal
import System.Win32.DebugApi hiding (outputDebugString)
import System.Win32.WindowsString.Types   ( withTString )
import System.OsString.Windows

#include "windows_cconv.h"



--------------------------------------------------------------------------

-- On process being debugged


outputDebugString :: WindowsString -> IO ()
outputDebugString s = withTString s $ \c_s -> c_OutputDebugString c_s