From ae1aee40a71515d7581403b017566fdf7d7f963e Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Sat, 17 Dec 2011 09:49:48 +0100 Subject: [PATCH] Fixed typo in cmpopt-clos.lsp --- src/cmp/cmpopt-clos.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cmp/cmpopt-clos.lsp b/src/cmp/cmpopt-clos.lsp index 32ce18b81..bb711dce0 100644 --- a/src/cmp/cmpopt-clos.lsp +++ b/src/cmp/cmpopt-clos.lsp @@ -62,4 +62,4 @@ (null (rest methods)) (let* ((principal (first methods))) (or (optimizable-slot-reader principal whole) - (optimizable-slot-writer principal rest))))))) + (optimizable-slot-writer principal whole)))))))