From ed125f0cbce859641add0812c964f12f11bcadac Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20F=2E=20Wittenberger?= Date: Sat, 7 Nov 2015 18:54:48 +0100 Subject: [PATCH] In thread-join! handle joining a thread in state `sleeping` with timeout. Signed-off-by: Peter Bex --- NEWS | 4 ++++ srfi-18.scm | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/NEWS b/NEWS index 4527b44..12e0014 100644 --- a/NEWS +++ b/NEWS @@ -17,6 +17,10 @@ declared types exactly. Specializations are matched from first to last to resolve ambiguities (#1214). +- Core libraries + - SRFI-18: thread-join! no longer gives an error when passed a + thread in the "sleeping" state (thanks to Joerg Wittenberger) + 4.10.1 - Core libraries diff --git a/srfi-18.scm b/srfi-18.scm index 7c908f2..2ae489d 100644 --- a/srfi-18.scm +++ b/srfi-18.scm @@ -183,7 +183,7 @@ (##sys#make-structure 'condition '(uncaught-exception) (list '(uncaught-exception . reason) (##sys#slot thread 7)) ) ) ) ) - ((blocked ready) + ((blocked ready sleeping) (if limit (return (if tosupplied -- 2.1.4