* renamed loadunit_int -> loadunit

compiler/ppu.pas

@@ -51,8 +51,7 @@ const
   {general}
   ibmodulename     = 1;
   ibsourcefiles    = 2;
-  ibloadunit_int   = 3;
-  ibloadunit_imp   = 4;
+  ibloadunit       = 3;
   ibinitunit       = 5;
   iblinkofiles     = 6;
   iblinksharedlibs = 7;
@@ -796,7 +795,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.24  1999-02-22 13:07:00  pierre
+  Revision 1.25  1999-03-02 13:49:18  peter
+    * renamed loadunit_int -> loadunit
+
+  Revision 1.24  1999/02/22 13:07:00  pierre
     + -b and -bl options work !
     + cs_local_browser ($L+) is disabled if cs_browser ($Y+)
       is not enabled when quitting global section

compiler/symppu.inc

@@ -175,7 +175,7 @@
            current_ppu^.putbyte(byte(hp^.in_interface));
            hp:=pused_unit(hp^.next);
          end;
-        current_ppu^.writeentry(ibloadunit_int);
+        current_ppu^.writeentry(ibloadunit);
       end;
 
 
@@ -432,13 +432,12 @@
          repeat
            b:=current_ppu^.readentry;
            case b of
-            { ibinitunit : usedunits^.insert(readstring); }
             ibmodulename : begin
                              stringdispose(current_module^.modulename);
                              current_module^.modulename:=stringdup(current_ppu^.getstring);
                            end;
            ibsourcefiles : readsourcefiles;
-          ibloadunit_int : readloadunit;
+              ibloadunit : readloadunit;
         iblinksharedlibs : readcontainer(current_module^.LinkSharedLibs);
         iblinkstaticlibs : readcontainer(current_module^.LinkStaticLibs);
          iblinkunitfiles : readcontainer(current_module^.LinkUnitFiles);
@@ -452,7 +451,10 @@
 
 {
   $Log$
-  Revision 1.33  1999-02-23 18:29:25  pierre
+  Revision 1.34  1999-03-02 13:49:19  peter
+    * renamed loadunit_int -> loadunit
+
+  Revision 1.33  1999/02/23 18:29:25  pierre
     * win32 compilation error fix
     + some work for local browser (not cl=omplete yet)