From c9543b4f4d3915f4b21b4620bea574b8fafd1e30 Mon Sep 17 00:00:00 2001 From: Nikodemus Siivola Date: Fri, 29 Feb 2008 10:41:46 +0000 Subject: [PATCH] 1.0.15.5: handler from COPY-DESCRIPTOR-TO-STREAM to check EINTR from select() * Just return, and continue copying the next time. Reported by Vitaly Mayatskikh on sbcl-devel. --- src/code/run-program.lisp | 8 +++++--- version.lisp-expr | 2 +- 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/src/code/run-program.lisp b/src/code/run-program.lisp index df3e173..9a59ddb 100644 --- a/src/code/run-program.lisp +++ b/src/code/run-program.lisp @@ -830,9 +830,11 @@ Users Manual for details about the PROCESS structure."#-win32" (ash 1 descriptor) 0 0 0) (cond ((null result) - (error "~@" - (strerror readable/errno))) + (if (eql sb-unix:eintr readable/errno) + (return) + (error "~@" + (strerror readable/errno)))) ((zerop result) (return)))) (multiple-value-bind (count errno) diff --git a/version.lisp-expr b/version.lisp-expr index d796916..b9a44bb 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"1.0.15.4" +"1.0.15.5" -- 1.7.10.4