Anonymous user
Terminal control/Unicode output: Difference between revisions
Terminal control/Unicode output (view source)
Revision as of 06:29, 27 September 2011
, 12 years agoAdded PicoLisp
m (→{{header|Tcl}}: note on what's happening) |
(Added PicoLisp) |
||
Line 31:
exit 252 # Incompatible hardware
}</lang>
=={{header|PicoLisp}}==
<lang PicoLisp>(if (sub? "UTF-8" (or (sys "LC_ALL") (sys "LC_CTYPE") (sys "LANG")))
(prinl (char (hex "25b3")))
(quit "UTF-8 capable terminal required") )</lang>
=={{header|Tcl}}==
| |||