From b78bd819ce0e2dc89ee4e3c6d537cb5d43e9b40e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= Date: Mon, 7 Mar 2016 21:52:47 +0100 Subject: [PATCH] newcmp: remove *s-c-n* --- src/new-cmp/cmpmain.lsp | 9 --------- 1 file changed, 9 deletions(-) diff --git a/src/new-cmp/cmpmain.lsp b/src/new-cmp/cmpmain.lsp index 6bf358c6a..0a1c659ae 100644 --- a/src/new-cmp/cmpmain.lsp +++ b/src/new-cmp/cmpmain.lsp @@ -643,15 +643,6 @@ returned as the value of COMPILE. In any case, COMPILE creates temporary files, whose filenames begin with \"gazonk\", which are automatically deleted after compilation." (unless (symbolp name) (error "~s is not a symbol." name)) - - ;; Deprecated, to be removed in next release - (when *suppress-compiler-notes* - (setf *suppress-compiler-messages* - `(or ,*suppress-compiler-messages* compiler-note))) - (when *suppress-compiler-warnings* - (setf *suppress-compiler-messages* - `(or ,*suppress-compiler-messages* compiler-warning))) - (cond ((and supplied-p def) (when (functionp def) (unless (function-lambda-expression def)