write escapes

David Halls <[email protected]> Wed, 31 Mar 2021 22:43:28 +0000

Newsgroups	gmane.lisp.scheme.bigloo
Message-ID	<CABX1NxEDvAbUnCjYs8kXxTB2MrALzeZKLZpfVJiiT3mNX10ccA@mail.gmail.com>

Hi-

Is there a way to get write to use hex escapes instead of octal?

i.e. instead of:

1:=> (write "\x01")
"\001"#<output_port:stdout>

I'd like:

1:=> (write "\x01")
"\x01"#<output_port:stdout>

I note UCS does something similar:

1:=> (write (utf8-string->ucs2-string "\u0001"))
#u"\001"#<output_port:stdout>

Thanks

David