diff options
Diffstat (limited to 'HsLocale.hsc')
-rw-r--r-- | HsLocale.hsc | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/HsLocale.hsc b/HsLocale.hsc deleted file mode 100644 index a54ff34..0000000 --- a/HsLocale.hsc +++ /dev/null @@ -1,27 +0,0 @@ -{-# OPTIONS -fglasgow-exts #-} ------------------------------------------------------------------------------ --- | --- Module : HsLocale --- Copyright : (C) 2007 Andrea Rossato --- License : BSD3 --- --- Maintainer : andrea.rossato@unibz.it --- Stability : unstable --- Portability : unportable --- ------------------------------------------------------------------------------ - -module HsLocale - ( setupLocale - ) where - -import Foreign.C - -#include <locale.h> -foreign import ccall unsafe "locale.h setlocale" - setlocale :: CInt -> CString -> IO CString - -setupLocale :: IO () -setupLocale = withCString "" $ \s -> do - setlocale (#const LC_ALL) s - return () |