Browse Source

* 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

florian 25 years ago
parent
commit
0fb3ed4ad3
1 changed files with 8 additions and 3 deletions
  1. 8 3
      compiler/htypechk.pas

+ 8 - 3
compiler/htypechk.pas

@@ -275,8 +275,8 @@ implementation
                               b:=1;
                               b:=1;
                             end
                             end
                            else
                            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
                              begin
                                doconv:=hct;
                                doconv:=hct;
                                b:=2;
                                b:=2;
@@ -901,7 +901,12 @@ implementation
 end.
 end.
 {
 {
   $Log$
   $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 ''
     * optimized ansistring compare with ''
     * fixed 852
     * fixed 852