Improve printing of SSH keys.

* src/key-type.c (print_key): New procedure.
  (init_key_type): Register the callback for printing.
  (guile_ssh_key_get_type): Use `ssh_privatekey_type' instead of
  `ssh_key_type'.