[Haskell-cafe] Porting setlocale to Windows