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

* fixed missing typecast

Browse Source
This commit is contained in:
peter 2000-12-10 20:25:32 +00:00
parent f6eaa4c02b
commit 0bee4f7cb9
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/symtable.pas
View File

@ -1075,7 +1075,7 @@ implementation
assigned(defowner) and assigned(defowner) and
( (
not(m_delphi in aktmodeswitches) or not(m_delphi in aktmodeswitches) or
is_object(defowner) is_object(pdef(defowner))
) then ) then
begin begin
hsym:=search_class_member(pobjectdef(defowner),sym^.name); hsym:=search_class_member(pobjectdef(defowner),sym^.name);
@ -2368,7 +2368,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.20 2000-12-10 14:14:51 florian Revision 1.21 2000-12-10 20:25:32 peter
* fixed missing typecast
Revision 1.20 2000/12/10 14:14:51 florian
* fixed web bug 1203: class fields can be now redefined * fixed web bug 1203: class fields can be now redefined
in Delphi mode though I don't like this :/ in Delphi mode though I don't like this :/