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

* same fix for objects and classes

Browse Source
This commit is contained in:
peter 2001-02-20 18:35:35 +00:00
parent 69705d29e9
commit b7fcca05f8
1 changed files with 16 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/pdecvar.pas
View File

@ -163,7 +163,7 @@ implementation
{ this is needed for Delphi mode at least { this is needed for Delphi mode at least
but should be OK for all modes !! (PM) } but should be OK for all modes !! (PM) }
ignore_equal:=true; ignore_equal:=true;
if is_record then if is_record or is_object then
begin begin
{ for records, don't search the recordsymtable for { for records, don't search the recordsymtable for
the symbols of the types } the symbols of the types }
@ -538,7 +538,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.7 2001-02-20 11:19:45 marco Revision 1.8 2001-02-20 18:35:35 peter
* same fix for objects and classes
Revision 1.7 2001/02/20 11:19:45 marco
* Fix passing tvarrec to array of const * Fix passing tvarrec to array of const
Revision 1.6 2000/12/25 00:07:27 peter Revision 1.6 2000/12/25 00:07:27 peter