From 09922eb8d444ff458d5aa8c56a84347dc2d09046 Mon Sep 17 00:00:00 2001 From: jjgarcia Date: Mon, 17 May 2004 07:44:08 +0000 Subject: [PATCH] Remove debug statement --- src/cmp/cmpmulti.lsp | 1 - 1 file changed, 1 deletion(-) diff --git a/src/cmp/cmpmulti.lsp b/src/cmp/cmpmulti.lsp index 470c0858e..d7934828a 100644 --- a/src/cmp/cmpmulti.lsp +++ b/src/cmp/cmpmulti.lsp @@ -217,7 +217,6 @@ (defun c2multiple-value-setq (vars form) (multiple-value-bind (min-values max-values) (c1form-values-number form) - (print (list (c1form-type form) min-values max-values)) (if (= min-values max-values) (do-m-v-setq-fixed min-values vars form nil) (progn