Commits

Moritz Heidkamp committed 842dd98

rename `destination-channel` to `receiving-channel` in `make-receiving-channel`

Comments (0)

Files changed (1)

       (queue-add! (channel-on-drain-handlers channel) thunk)))
 
 (define (make-receiving-channel source-channel on-receive)
-  (let ((destination-channel (make-channel)))
+  (let ((receiving-channel (make-channel)))
     (on-channel-receive
      source-channel
      (lambda (message)
-       (on-receive destination-channel message)))
+       (on-receive receiving-channel message)))
     (on-channel-close
-     destination-channel
+     receiving-channel
      (lambda ()
        (channel-close! source-channel)))
-    destination-channel))
+    receiving-channel))
 
 (define (channel-fold! channel proc seed)
   (let ((accumulator (make-mutex)))