Minor cleanups.
Improved tangibility.
Fixed call to PEEK-CHAR.
Improved tangibility.