From 8164d5aaf4daeb377543ee0cbc9ab4ef7f0e05c8 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Wed, 30 Dec 2015 21:55:32 +0000
Subject: [PATCH]   * don't make all procdef symbols global if we are using
 section-based     smartlinkin

git-svn-id: trunk@32803 -
---
 compiler/psub.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/psub.pas b/compiler/psub.pas
index bea0dc8f96..8c80de291d 100644
--- a/compiler/psub.pas
+++ b/compiler/psub.pas
@@ -2091,7 +2091,7 @@ implementation
             if (not current_module.in_interface) then
               include(pdflags,pd_implemen);
             if (not current_module.is_unit) or
-               create_smartlink then
+               create_smartlink_library then
               include(pd.procoptions,po_global);
             pd.forwarddef:=false;
           end;