Explorar o código

* tdictionary.rename() returns nil if the original object wasn't found
(reported by Sergey Korshunoff <[email protected]>)

Jonas Maebe %!s(int64=23) %!d(string=hai) anos
pai
achega
9319168ca4
Modificáronse 1 ficheiros con 6 adicións e 1 borrados
  1. 6 1
      compiler/cclasses.pas

+ 6 - 1
compiler/cclasses.pas

@@ -1245,6 +1245,7 @@ end;
                  end;
              end;
           end;
+        result := nil;
       end;
 
 
@@ -1728,7 +1729,11 @@ end;
 end.
 {
   $Log$
-  Revision 1.13  2002-05-18 13:34:05  peter
+  Revision 1.14  2002-06-17 13:56:14  jonas
+    * tdictionary.rename() returns nil if the original object wasn't found
+      (reported by Sergey Korshunoff <[email protected]>)
+
+  Revision 1.13  2002/05/18 13:34:05  peter
     * readded missing revisions
 
   Revision 1.12  2002/05/16 19:46:35  carl