mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 07:49:12 +02:00
* defaultsymtablestack is now restored after parser.compile
This commit is contained in:
parent
472fe53fe5
commit
ae7a04ea12
@ -163,6 +163,7 @@ unit parser;
|
||||
{ symtable }
|
||||
oldmacros,
|
||||
oldrefsymtable,
|
||||
olddefaultsymtablestack,
|
||||
oldsymtablestack : psymtable;
|
||||
oldprocprefix : string;
|
||||
oldaktprocsym : pprocsym;
|
||||
@ -211,6 +212,7 @@ unit parser;
|
||||
old_compiled_module:=compiled_module;
|
||||
{ save symtable state }
|
||||
oldsymtablestack:=symtablestack;
|
||||
olddefaultsymtablestack:=defaultsymtablestack;
|
||||
oldrefsymtable:=refsymtable;
|
||||
oldmacros:=macros;
|
||||
oldprocprefix:=procprefix;
|
||||
@ -419,6 +421,7 @@ unit parser;
|
||||
{ restore symtable state }
|
||||
refsymtable:=oldrefsymtable;
|
||||
symtablestack:=oldsymtablestack;
|
||||
defaultsymtablestack:=olddefaultsymtablestack;
|
||||
macros:=oldmacros;
|
||||
aktprocsym:=oldaktprocsym;
|
||||
procprefix:=oldprocprefix;
|
||||
@ -501,7 +504,10 @@ unit parser;
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.92 1999-11-18 15:34:46 pierre
|
||||
Revision 1.93 1999-11-24 11:41:03 pierre
|
||||
* defaultsymtablestack is now restored after parser.compile
|
||||
|
||||
Revision 1.92 1999/11/18 15:34:46 pierre
|
||||
* Notes/Hints for local syms changed to
|
||||
Set_varstate function
|
||||
|
||||
|
@ -1552,7 +1552,10 @@ unit pmodules;
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.171 1999-11-22 22:21:46 pierre
|
||||
Revision 1.172 1999-11-24 11:41:05 pierre
|
||||
* defaultsymtablestack is now restored after parser.compile
|
||||
|
||||
Revision 1.171 1999/11/22 22:21:46 pierre
|
||||
* Compute correct Exe Filenam
|
||||
|
||||
Revision 1.170 1999/11/22 00:23:09 pierre
|
||||
|
@ -2566,7 +2566,10 @@ implementation
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.66 1999-11-22 00:23:09 pierre
|
||||
Revision 1.67 1999-11-24 11:41:05 pierre
|
||||
* defaultsymtablestack is now restored after parser.compile
|
||||
|
||||
Revision 1.66 1999/11/22 00:23:09 pierre
|
||||
* also complain about unused functions in program
|
||||
|
||||
Revision 1.65 1999/11/19 14:49:15 pierre
|
||||
|
Loading…
Reference in New Issue
Block a user