From 8adde04a0bdb5ba65241a8c518e327fcb8953dd8 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Fri, 10 Oct 2008 14:11:00 +0000 Subject: [PATCH] * don't warn that a unit won't be smartlinked in case no .a file is available when smart linking happens using the plain object files (mantis #12316) git-svn-id: trunk@11874 - --- compiler/link.pas | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/compiler/link.pas b/compiler/link.pas index 3dc6b1d68f..0f2d611710 100644 --- a/compiler/link.pas +++ b/compiler/link.pas @@ -376,7 +376,11 @@ Implementation { if smart not avail then try static linking } if (flags and uf_static_linked)<>0 then begin - Message1(exec_t_unit_not_smart_linkable_switch_to_static,modulename^); + { if not create_smartlink_library, then smart linking happens using the + regular object files + } + if create_smartlink_library then + Message1(exec_t_unit_not_smart_linkable_switch_to_static,modulename^); mask:=mask or link_static; end else