paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-06 11:10:36 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed type conversion test for open arrays: the to and from fields where

Browse Source 
exchanged which leads under certain circumstances to problems when
    passing arrays of classes/class references as open array parameters
This commit is contained in:
florian 2000-05-16 16:01:03 +00:00
parent 64b3cac231
commit 0fb3ed4ad3
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/htypechk.pas
View File

@ -275,8 +275,8 @@ implementation
b:=1;
end
else
if isconvertable(parraydef(def_to)^.elementtype.def,
parraydef(def_from)^.elementtype.def,hct,nothingn,false)<>0 then
if isconvertable(parraydef(def_from)^.elementtype.def,
parraydef(def_to)^.elementtype.def,hct,nothingn,false)<>0 then
begin
doconv:=hct;
b:=2;
@ -901,7 +901,12 @@ implementation
end.
{
$Log$
Revision 1.59 2000-02-18 16:13:29 florian
Revision 1.60 2000-05-16 16:01:03 florian
* fixed type conversion test for open arrays: the to and from fields where
exchanged which leads under certain circumstances to problems when
passing arrays of classes/class references as open array parameters
Revision 1.59 2000/02/18 16:13:29 florian
* optimized ansistring compare with ''
* fixed 852