From 14d4e8407fad5a7edfaa1d6ccbc2e6bd63427c12 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= Date: Mon, 5 Dec 2016 14:24:01 +0100 Subject: [PATCH] normalize-build-target-name: remove noise (cmponote) --- src/cmp/cmputil.lsp | 14 +++----------- 1 file changed, 3 insertions(+), 11 deletions(-) diff --git a/src/cmp/cmputil.lsp b/src/cmp/cmputil.lsp index ea16a9537..94d8025cd 100644 --- a/src/cmp/cmputil.lsp +++ b/src/cmp/cmputil.lsp @@ -43,17 +43,9 @@ (enough-namestring (si::coerce-to-filename path))) (defun normalize-build-target-name (target) - (flet ((maybe-warn (expected-name) - (unless (eql target expected-name) - (cmpwarn-style "External use of internal interface C::BUILDER. Use one of:~% -C:BUILD-FASL, C:BUILD-PROGRAM, C:BUILD-STATIC-LIBRARY, C:BUILD-SHARED-LIBRARY~%")) - expected-name)) - (ecase target - ((:shared-library :dll :standalone-shared-library :standalone-dll) - (maybe-warn :shared-library)) - ((:static-library :lib :standalone-static-library :standalone-lib) - (maybe-warn :static-library)) - ((:fasl :program) target)))) + ((:shared-library :dll :standalone-shared-library :standalone-dll) :shared-library) + ((:static-library :lib :standalone-static-library :standalone-lib) :static-library) + ((:fasl :program) target)) (defun innermost-non-expanded-form (form) (when (listp form)