(display (version))
(newline)
(for-each (lambda (n)
            (simple-format #t "~S\t~S\t~S~%"
                           n
                           (integer->char n)
                           (string (integer->char n))))
          (iota 256))