Pārlūkot izejas kodu

* RunError 220 -> RunError 219 to be more consistent with as operator

carl 23 gadi atpakaļ
vecāks
revīzija
2d8417cdfc
1 mainītis faili ar 5 papildinājumiem un 2 dzēšanām
  1. 5 2
      rtl/inc/generic.inc

+ 5 - 2
rtl/inc/generic.inc

@@ -496,7 +496,7 @@ begin
        exit
      else
        vmt:=pvmt(vmt)^.parent;
-   RunError(220);
+   RunError(219);
 end;
 
 {$endif not FPC_SYSTEM_HAS_FPC_CHECK_OBJECT_EXT}
@@ -941,7 +941,10 @@ end;
 {$endif ndef FPC_SYSTEM_HAS_INT_STR_LONGWORD}
 {
   $Log$
-  Revision 1.40  2002-10-10 16:08:50  florian
+  Revision 1.41  2002-10-12 20:32:41  carl
+    * RunError 220 -> RunError 219 to be more consistent with as operator
+
+  Revision 1.40  2002/10/10 16:08:50  florian
     + several widestring/pwidechar related helpers added
 
   Revision 1.39  2002/10/05 14:20:16  peter