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

compiler: cleanup

Browse Source 
git-svn-id: trunk@16492 -
This commit is contained in:
paul 2010-12-02 03:06:01 +00:00
parent 2155dadf5e
commit 515c99cc01
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/pdecobj.pas
View File

@ -1047,12 +1047,10 @@ implementation
{ parse optional GUID for interfaces } { parse optional GUID for interfaces }
parse_guid; parse_guid;
//symtablestack.push(current_objectdef.symtable);
push_child_hierarcy(current_objectdef); push_child_hierarcy(current_objectdef);
insert_generic_parameter_types(genericdef,genericlist); insert_generic_parameter_types(genericdef,genericlist);
{ parse and insert object members } { parse and insert object members }
parse_object_members; parse_object_members;
//symtablestack.pop(current_objectdef.symtable);
pop_child_hierarchy(current_objectdef); pop_child_hierarchy(current_objectdef);
end; end;