> (defvar pretty-scheme-keywords
> '(("\\(->\\)" . 8594)
> ("\\(<=\\)" . 8804)
> ("\\(<==\\)" . 8656)
> ("\\(>=\\)" . 8805)
> ("\\(==>\\)" . 8658))
> "alist from regexps to Unicode code points")
Would you mind translating the codepoints to hex (Emacs Lisp supports
the #xNNNN read syntax) for easier lookup?
We could start an Emacs section in the Scheme Cookbook, for hacks that
make it easier to use Scheme from Emacs.