Do not double backslashes

`~S` binds `*print-escape*` to T, and for any backslash resulting from `%js` outputs two backslashes, effectively escaping the backslash.  Using `~A` fixes this.

On a side note, how strong is the reason to escape characters outside the ASCII range?