Anonymous user
Terminal control/Unicode output: Difference between revisions
m
→{{header|Haskell}}
(Added Haskell) |
|||
Line 84:
main = do
x <- mapM lookupEnv ["LANG", "LC_ALL", "LC_CTYPE"]
if any (
then putStrLn "UTF supported: \x25b3"
else putStrLn "UTF not supported"
Line 92:
UTF supported: △
</pre>
=={{header|Mathematica}}==
<lang Mathematica>If[StringMatchQ[$CharacterEncoding, "UTF*"], Print[FromCharacterCode[30000]], Print["UTF-8 capable terminal required"]]
| |||