Function: LIST->PIPE

Source

(defun list->pipe (lst)
  (make-pipe (car lst)
	     (cdr lst)))