From af73b3c091a0a86f698ef44a57c27670428ced65 Mon Sep 17 00:00:00 2001 From: William Harold Newman Date: Thu, 5 Sep 2002 02:07:21 +0000 Subject: [PATCH] 0.7.7.14: Nathan Froyd pointed out *another* dumb error in the same function in seq.lisp, so I fixed that too. (2 bugs per 10 lines times 150K lines gives what?) --- src/code/seq.lisp | 2 +- version.lisp-expr | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/code/seq.lisp b/src/code/seq.lisp index d107578..9ccda2a 100644 --- a/src/code/seq.lisp +++ b/src/code/seq.lisp @@ -113,7 +113,7 @@ length))) (error 'end-too-large-error :datum end - :expected-type (if max-index + :expected-type (if max-end `(integer 0 ,max-end) ;; This seems silly, is there something better? '(integer (0) 0))))) diff --git a/version.lisp-expr b/version.lisp-expr index db83134..300a849 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -18,4 +18,4 @@ ;;; for internal versions, especially for internal versions off the ;;; main CVS branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.7.7.13" +"0.7.7.14" -- 1.7.10.4