2
0
Эх сурвалжийг харах

* fixed storing the symbols of the global macro symbol table in the ppu in
macpas mode after r32153
o adjusted test so it checks this

git-svn-id: trunk@37912 -

Jonas Maebe 8 жил өмнө
parent
commit
320a699967

+ 7 - 0
compiler/fppu.pas

@@ -1468,6 +1468,13 @@ var
          tstoredsymtable(globalsymtable).buildderefimpl;
          tunitwpoinfo(wpoinfo).buildderef;
          tunitwpoinfo(wpoinfo).buildderefimpl;
+
+         if assigned(globalmacrosymtable) and (globalmacrosymtable.SymList.count > 0) then
+            begin
+              tstoredsymtable(globalmacrosymtable).buildderef;
+              tstoredsymtable(globalmacrosymtable).buildderefimpl;
+            end;
+
          if (flags and uf_local_symtable)<>0 then
            tstoredsymtable(localsymtable).buildderef_registered;
          buildderefunitimportsyms;

+ 2 - 0
tests/test/tmacpas1.pp

@@ -1,3 +1,5 @@
+{ %recompile }
+
 program tmacpas1;
 
 {Tests of mac pascal constructs, concerning two units}