Put back an accidentally elided ELSE branch in PLACEHOLDER-SET!

This commit is contained in:
sperber 2002-09-06 14:11:36 +00:00
parent feb4ffcb08
commit e3d6f985fc
1 changed files with 3 additions and 2 deletions

View File

@ -39,7 +39,8 @@
=> (lambda (thread) => (lambda (thread)
(loop (cons thread waiters)))) (loop (cons thread waiters))))
(else (else
waiters)))))))))) waiters))))
(else #f)))))))
(if waiters (if waiters
(for-each make-ready waiters) (for-each make-ready waiters)
(if (not (eq? value (placeholder-value placeholder))) (if (not (eq? value (placeholder-value placeholder)))