paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 15:29:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

* symtable.insert changed to procedure

Browse Source
This commit is contained in:
peter 2000-06-01 19:14:09 +00:00
parent 40de0309f6
commit 8b260f5793
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/pdecl.pas
View File

@ -1024,7 +1024,7 @@ unit pdecl;
storetokenpos:=tokenpos;
tokenpos:=defpos;
newtype:=new(ptypesym,init(typename,tt));
newtype:=ptypesym(symtablestack^.insert(newtype));
symtablestack^.insert(newtype);
tokenpos:=storetokenpos;
end;
consume(_SEMICOLON);
@ -1210,7 +1210,10 @@ unit pdecl;
end.
{
$Log$
Revision 1.181 2000-04-17 18:44:22 peter
Revision 1.182 2000-06-01 19:14:09 peter
* symtable.insert changed to procedure
Revision 1.181 2000/04/17 18:44:22 peter
* fixed forward resolving with redefined types
Revision 1.180 2000/02/09 13:22:56 peter