Errore di run-time durante il tentativo di stampare un carattere Unicode

Question

Char è il tipo per caratteri Unicode in Haskell e String è semplicemente [Char] (ovvero un elenco di articoli Char). Ecco qualche semplice codice:

main = putStrLn "©" -- Unicode string 

Questo codice compila bene, ma ho l'eccezione di runtime quando l'eseguo in PowerShel.exe o cmd.exe:

app. exe: commitBuffer: argomento non valido (carattere non valido)

Perché ciò accade? Stranamente, quando faccio lo stesso in C#, non ottengo alcuna eccezione:

Console.WriteLine("©"); 

In .NET, caratteri Unicode sono troppo. PowerShell o cmd stampe c invece ©, ma almeno non ottengo eccezione. Come posso far funzionare senza problemi il mio eseguibile Haskell?

Answer 1

Penso che questo dovrebbe essere un errore in GHC, ma c'è una soluzione alternativa. La codifica predefinita per tutti gli handle in un programma GHC (tranne quelli aperti in modalità binaria) è solo la codifica accettata dalla console senza gestione degli errori. Fortunatamente puoi aggiungere la gestione degli errori con qualcosa di simile.

makeSafe h = do 
    ce' <- hGetEncoding h 
    case ce' of 
    Nothing -> return() 
    Just ce -> mkTextEncoding ((takeWhile (/= '/') $ show ce) ++ "//TRANSLIT") >>= 
     hSetEncoding h 

main = do 
    mapM_ makeSafe [stdout, stdin, stderr] 
    -- The rest of your main function. 

Answer 2

In Windows, la correzione indica alla shell di utilizzare code page 65001 (instructions here), che mette Windows in "modalità UTF-8". Non è perfetto, ma per la maggior parte dei personaggi dovresti vedere i caratteri unicode gestiti molto meglio.