UTF-8 encode and decode: Difference between revisions

m
No edit summary
Line 571:
main = do
putStrLn "Character Unicode UTF-8 encoding (hex)"
putStrLn "-----------------------------------------"
for_ [0x0041, 0x00F6, 0x0416, 0x20AC, 0x1D11E] $ \codepoint -> do
let values = encodeCodepoint codepoint
Anonymous user