Преглед на файлове

* added inherited init call to tstringcontainer.init_no_double for Peter

pierre преди 26 години
родител
ревизия
7d2b96d4d6
променени са 1 файла, в които са добавени 5 реда и са изтрити 1 реда
  1. 5 1
      compiler/cobjects.pas

+ 5 - 1
compiler/cobjects.pas

@@ -786,6 +786,7 @@ end;
 
     constructor tstringcontainer.init_no_double;
       begin
+         inherited init;
          doubles:=false;
       end;
 
@@ -2216,7 +2217,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.39  1999-08-05 14:58:07  florian
+  Revision 1.40  1999-08-12 23:19:05  pierre
+   * added inherited init call to tstringcontainer.init_no_double for Peter
+
+  Revision 1.39  1999/08/05 14:58:07  florian
     * some fixes for the floating point registers
     * more things for the new code generator