summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjoost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2>2015-10-09 18:40:40 +0000
committerjoost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2>2015-10-09 18:40:40 +0000
commit3d71e59776a1e7e81fb8932b8bf82d875c8c46aa (patch)
tree67a93021c13d9f4a61fe7c13ec792e66305dbce9
parent5c844a72b76cc1857565dcd041805edf74e20d3f (diff)
downloadfpc-3d71e59776a1e7e81fb8932b8bf82d875c8c46aa.tar.gz
--- Merging r29810 into '.':
U compiler/symdef.pas --- Recording mergeinfo for merge of r29810 into '.': U . # revisions: 29810, adapted manually git-svn-id: http://svn.freepascal.org/svn/fpc/branches/fixes_3_0@31996 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--compiler/symdef.pas3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/symdef.pas b/compiler/symdef.pas
index 8ca11a0999..41eee6eb13 100644
--- a/compiler/symdef.pas
+++ b/compiler/symdef.pas
@@ -1170,7 +1170,7 @@ implementation
if not assigned(current_module.ansistrdef) then
begin
{ if we did not create it yet we need to do this now }
- if current_module.is_unit then
+ if current_module.in_interface then
symtable:=current_module.globalsymtable
else
symtable:=current_module.localsymtable;
@@ -3133,6 +3133,7 @@ implementation
begin
inherited create(pointerdef,def);
has_pointer_math:=cs_pointermath in current_settings.localswitches;
+ // Dump_Stack(Output,get_frame);
end;