UTF-8 encode and decode: Difference between revisions

m
Replace deprecated functions
m (Replace deprecated functions)
Line 3,927:
writeln("-------------------------------------------------");
for ch range "AöЖ€𝄞" do
utf8 := striToUtf8toUtf8(str(ch));
writeln(ch rpad 11 <& "U+" <& ord(ch) radix 16 lpad0 4 rpad 7 <&
hex(utf8) rpad 22 <& utf8ToStrifromUtf8(utf8));
end for;
end func;</syntaxhighlight>
29

edits