src/channel-type.c: Set the printer procedure for the smob.

* src/channel-type.c (print_channel): New procedure.
  (init_channel_type): Set the printer procedure for the smob.
* NEWS: Update.