From 9c59ea751a3a6a914ca41a0c8c870cc5c6bd9e43 Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Mon, 24 Jan 2011 22:30:29 +0100 Subject: [PATCH] Fixed typo in proclamations for STORE-VALUE and USE-VALUE (J. James) --- src/cmp/proclamations.lsp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/cmp/proclamations.lsp b/src/cmp/proclamations.lsp index e8f8c2b86..e5773384b 100644 --- a/src/cmp/proclamations.lsp +++ b/src/cmp/proclamations.lsp @@ -319,8 +319,8 @@ (proclamation abort (&optional (or null condition)) (values)) (proclamation continue (&optional (or null condition)) null) (proclamation muffle-warning (&optional (or null condition)) (values)) -(proclamation store-value (value &optional (or null condition)) null) -(proclamation use-value (value &optional (or null condition)) null) +(proclamation store-value (t &optional (or null condition)) null) +(proclamation use-value (t &optional (or null condition)) null) ;; Slot accessors: ;; (proclamation cell-error-name (cell-error) t)