Laufzeitausnahme beim Drucken eines Unicode-Zeichens

Question

Char ist der Typ für Unicode-Zeichen in Haskell, und String ist einfach [Char] (d. H. Eine Liste von Char Elemente). Hier finden Sie einige einfache Code:

main = putStrLn "©" -- Unicode string 

Dieser Code kompiliert in Ordnung, aber ich bekomme die Runtime-Ausnahme, wenn ich es laufen in der PowerShel.exe oder cmd.exe:

App. exe:: commitBuffer: ungültiges Argument (ungültiges Zeichen)

Warum passiert das? Seltsam genug, wenn ich das gleiche in C# zu tun, erhalte ich keine Ausnahme:

Console.WriteLine("©"); 

In .NET Zeichen sind zu Unicode. PowerShell oder cmd druckt c statt ©, aber zumindest bekomme ich keine Ausnahme. Wie kann ich meine Haskell-Programmdatei problemlos ausführen lassen?

Answer 1

Ich denke, dies sollte als ein Fehler in GHC zählen, aber es gibt einen Workaround. Die Standardcodierung für alle Handles in einem GHC-Programm (mit Ausnahme der im Binärmodus geöffneten Handles) ist nur die Codierung, die von der Konsole ohne Fehlerbehandlung akzeptiert wird. Glücklicherweise können Sie Fehlerbehandlung mit etwas wie diesem hinzufügen.

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

Unter Windows besteht die Behebung darin, der Shell mitzuteilen, dass sie code page 65001 (instructions here) verwenden soll, was Windows in den "UTF-8-Modus" versetzt. Es ist nicht perfekt, aber für die meisten Charaktere sollte man sehen, dass Unicode-Charaktere viel besser behandelt werden.