Raymond Toy pushed to branch master at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • src/code/run-program.lisp
    ... ... @@ -767,7 +767,7 @@
    767 767
    	    (multiple-value-bind (read-fd write-fd)
    
    768 768
    				 (unix:unix-pipe)
    
    769 769
    	      (unless read-fd
    
    770
    		(error (intl:gettext "Cound not create pipe: ~A")
    
    770
    		(error (intl:gettext "Could not create pipe: ~A")
    
    771 771
    		       (unix:get-unix-error-msg write-fd)))
    
    772 772
    	      (copy-descriptor-to-stream read-fd object cookie)
    
    773 773
    	      (push read-fd *close-on-error*)