From 85a4dd1c1dd122ffdbd6417f8458941a2c21ee67 Mon Sep 17 00:00:00 2001 From: Gabor Melis Date: Mon, 22 Sep 2008 19:10:01 +0000 Subject: [PATCH] 1.0.20.22: record bug 429 --- BUGS | 18 +++++++++++++++++- version.lisp-expr | 2 +- 2 files changed, 18 insertions(+), 2 deletions(-) diff --git a/BUGS b/BUGS index 8fd2a83..ebccf55 100644 --- a/BUGS +++ b/BUGS @@ -1882,7 +1882,23 @@ generally try to check returns in safe code, so we should here too.) call for functions already inline converted there, but he is not sure if this has adverse effects elsewhere. -428: TIMER SCHEDULE-STRESS in timer.impure.lisp fails +428: TIMER SCHEDULE-STRESS and PARALLEL-UNSCHEDULE in + timer.impure.lisp fails Failure modes vary. Core problem seems to be (?) recursive entry to RUN-EXPIRED-TIMERS. + +429: compiler hangs + + Compiling a file with this contents makes the compiler loop in + ORDER-UVL-SETS: + + (declaim (inline storage)) + (defun storage (x) + (the (simple-array flt (*)) (unknown x))) + + (defun test1 (lumps &key cg) + (let ((nodes (map 'list (lambda (lump) (storage lump)) + lumps))) + (setf (aref nodes 0) 2) + (assert (every #'~= (apply #'concatenate 'list nodes) '(2 3 6 9))))) diff --git a/version.lisp-expr b/version.lisp-expr index 3a8fe56..fb9a782 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.20.21" +"1.0.20.22" -- 1.7.10.4