src/channel.scm: Add `channel-set-stream!'.

* src/channel-func.c (guile_ssh_channel_set_stream_x): New
  procedure.
* src/channel.scm: Export `channel-set-stream!'.