RosettaCodeData/Task/UTF-8-encode-and-decode/Common-Lisp/utf-8-encode-and-decode-5.lisp

CL-USER> (test-utf-8)
character A, code point:     41, utf-8: 41
character ö, code point:     F6, utf-8: C3 B6
character Ж, code point:    416, utf-8: D0 96
character €, code point:   20AC, utf-8: E2 82 AC
character 𝄞, code point:  1D11E, utf-8: F0 9D 84 9E
T