From d0bdd647629a7184a3dc3597cd25d0022d15e936 Mon Sep 17 00:00:00 2001 From: Juho Snellman Date: Fri, 1 Dec 2006 16:26:22 +0000 Subject: [PATCH] 1.0.0.6: Fix a code path that was still using the old fast-method calling convention (reported by Pascal Costanza). --- NEWS | 7 +++++-- src/pcl/vector.lisp | 6 +----- version.lisp-expr | 2 +- 3 files changed, 7 insertions(+), 8 deletions(-) diff --git a/NEWS b/NEWS index be6a42e..5e20914 100644 --- a/NEWS +++ b/NEWS @@ -2,10 +2,13 @@ changes in sbcl-1.0.1 relative to sbcl-1.0: * improvement: sb-sprof traces call stacks to an arbitrary depth on x86/x86-64, rather than the previous fixed depth of 8 - * bug fix: fix handling of non-ascii command-line arguments (thanks to - Yaroslav Kavenchuk) + * bug fix: non-ascii command-line arguments are processed correctly + (thanks to Yaroslav Kavenchuk) * bug fix: TRACE :ENCAPSULATE NIL (and function end breakpoints) work on Windows. + * bug fix: non-required arguments were not passed correctly when a method + defined using DEFMETHOD was called from a mop-generated method using + CALL-NEXT-METHOD (reported by Pascal Costanza) changes in sbcl-1.0 relative to sbcl-0.9.18: * improvement: experimental support for threading on FreeBSD/x86. diff --git a/src/pcl/vector.lisp b/src/pcl/vector.lisp index 549c5e3..166208b 100644 --- a/src/pcl/vector.lisp +++ b/src/pcl/vector.lisp @@ -1091,11 +1091,7 @@ (method-function nm) nm) :call-method-args (list nms))))) - (if restp - (let* ((rest (nthcdr nreq method-args)) - (args (ldiff method-args rest))) - (apply fmf pv-cell nmc (nconc args (list rest)))) - (apply fmf pv-cell nmc method-args)))))) + (apply fmf pv-cell nmc method-args))))) (defun get-pv-cell (method-args pv-table) (let ((pv-wrappers (pv-wrappers-from-all-args pv-table method-args))) diff --git a/version.lisp-expr b/version.lisp-expr index 0e18e14..9892437 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.0.5" +"1.0.0.6" -- 1.7.10.4