* removed unused units

git-svn-id: trunk@36165 -

compiler/aopt.pas

@@ -80,7 +80,7 @@ Unit aopt;
       verbose,
       cpubase,
       cgbase,
-      aoptda,aoptcpu,aoptcpud;
+      aoptcpu;
 
     Constructor TAsmOptimizer.create(_AsmL: TAsmList);
       Begin

compiler/aoptbase.pas

@@ -112,7 +112,7 @@ unit aoptbase;
   implementation
 
     uses
-      verbose,globtype,globals,aoptcpub;
+      verbose,globals,aoptcpub;
 
   constructor taoptbase.create;
     begin

compiler/aoptda.pas

@@ -29,7 +29,7 @@ Unit aoptda;
 
     uses
       cpubase,cgbase,
-      aasmbase,aasmtai,aasmdata,aasmcpu,
+      aasmtai,aasmdata,aasmcpu,
       aoptcpub, aoptbase;
 
     Type
@@ -56,7 +56,7 @@ Unit aoptda;
   Implementation
 
     uses
-      globals, aoptobj;
+      globals;
 
     Procedure TAOptDFA.DoDFA;
     { Analyzes the Data Flow of an assembler list. Analyses the reg contents     }

compiler/aoptobj.pas

@@ -367,7 +367,6 @@ Unit AoptObj;
       cutils,
       globals,
       verbose,
-      procinfo,
       aoptutils;
 
 

compiler/assemble.pas

@@ -252,9 +252,7 @@ Implementation
 {$endif memdebug}
       script,fmodule,verbose,
       cpuinfo,
-      aasmcpu,
-      owar,owomflib
-      ;
+      aasmcpu;
 
     var
       CAssembler : array[tasm] of TAssemblerClass;

compiler/blockutl.pas

@@ -48,11 +48,11 @@ interface
 implementation
 
   uses
-    verbose,globtype,globals,cutils,constexp,
+    verbose,globtype,cutils,constexp,
     pass_1,pparautl,fmodule,
     aasmdata,
     nbas,ncon,nmem,nutils,
-    symbase,symconst,symtable,symsym,symcreat,objcutil,objcdef,defutil,
+    symbase,symconst,symtable,symsym,symcreat,objcutil,defutil,
     paramgr;
 
 

compiler/cgobj.pas

@@ -552,7 +552,7 @@ implementation
 
     uses
        globals,systems,
-       verbose,paramgr,symtable,symsym,
+       verbose,paramgr,symsym,
        tgobj,cutils,procinfo;
 
 {*****************************************************************************

compiler/compiler.pas

@@ -24,6 +24,9 @@ unit compiler;
 
 {$i fpcdefs.inc}
 
+{ some units are implicitly needed by the compiler }
+{$WARN 5023 off : Unit "$1" not used in $2}
+
 interface
 
 uses
@@ -44,7 +47,7 @@ uses
 {$ENDIF}
   verbose,comphook,systems,
   cutils,cfileutl,cclasses,globals,options,fmodule,parser,symtable,
-  assemble,link,dbgbase,import,export,tokens,pass_1,wpobase,wpo
+  assemble,link,dbgbase,import,export,tokens,wpo
   { cpu parameter handling }
   ,cpupara
   { procinfo stuff }

compiler/cresstr.pas

@@ -39,7 +39,7 @@ uses
    cutils,globtype,globals,systems,
    symbase,symconst,symtype,symdef,symsym,symtable,
    verbose,fmodule,ppu,
-   aasmbase,aasmtai,aasmdata,aasmcnst,
+   aasmtai,aasmdata,aasmcnst,
    aasmcpu;
 
     Type

compiler/dbgbase.pas

@@ -29,7 +29,7 @@ interface
       cclasses,
       systems,
       parabase,
-      symconst,symbase,symdef,symtype,symsym,symtable,
+      symconst,symbase,symdef,symtype,symsym,
       fmodule,
       aasmtai,aasmdata;
 

compiler/export.pas

@@ -29,7 +29,7 @@ uses
   cutils,cclasses,
   systems,
   symtype,symdef,symsym,
-  aasmbase,aasmdata;
+  aasmdata;
 
 type
    { export options }

compiler/expunix.pas

@@ -27,10 +27,10 @@ unit expunix;
 interface
 
 uses
-  cutils,cclasses,
+  cclasses,
   systems,
   export,
-  symtype,symdef,symsym,
+  symdef,symsym,
   aasmbase;
 
 type
@@ -55,15 +55,14 @@ implementation
 
 uses
   symconst,
-  globtype,globals,
-  aasmdata,aasmtai,aasmcpu,
+  globals,
+  aasmdata,aasmtai,
   fmodule,
   {$ifdef cpuhighleveltarget}
   symcreat,
   {$endif}
-  cgbase,cgutils,cpubase,cgobj,
-  cgcpu,hlcgobj,hlcgcpu,
-  ncgutil,
+  cgbase,
+  hlcgobj,hlcgcpu,
   verbose;
 
 

compiler/fmodule.pas

@@ -44,9 +44,9 @@ interface
     uses
        cutils,cclasses,cfileutl,
        globtype,finput,ogbase,fpkg,
-       symbase,symconst,symsym,
+       symbase,symsym,
        wpobase,
-       aasmbase,aasmtai,aasmdata;
+       aasmbase,aasmdata;
 
 
     const

compiler/fpcp.pas

@@ -67,7 +67,8 @@ implementation
     cfileutl,cutils,
     systems,globals,version,
     verbose,
-    entfile,fppu,ppu,pkgutil;
+    ppu,
+    entfile,pkgutil;
 
 { tpcppackage }
 

compiler/globals.pas

@@ -579,9 +579,10 @@ implementation
       macutils,
 {$endif}
 {$ifdef mswindows}
-      windirs,
+      windirs;
+{$else}
+      ;
 {$endif}
-      comphook;
 
 {****************************************************************************
                                  TLinkStrMap

compiler/hlcg2ll.pas

@@ -34,10 +34,10 @@ unit hlcg2ll;
   interface
 
     uses
-       cclasses,globtype,constexp,
+       globtype,constexp,
        cpubase,cgbase,cgutils,parabase,
        aasmbase,aasmtai,aasmdata,aasmcpu,
-       symconst,symtype,symdef,rgobj,
+       symconst,symtype,symdef,
        node,hlcgobj
        ;
 
@@ -329,9 +329,9 @@ unit hlcg2ll;
 implementation
 
     uses
-       globals,options,systems,
-       verbose,defutil,paramgr,symsym,
-       cgobj,tgobj,cutils,procinfo,
+       globals,systems,
+       verbose,defutil,
+       cgobj,tgobj,cutils,
        ncgutil;
 
   { thlcg2ll }

compiler/hlcgobj.pas

@@ -675,15 +675,15 @@ implementation
 
     uses
        globals,systems,
-       fmodule,export,
+       fmodule,
        verbose,defutil,paramgr,
        symtable,
        nbas,ncon,nld,ncgrtti,pass_2,
-       cpuinfo,cgobj,cutils,procinfo,
+       cgobj,cutils,procinfo,
 {$ifdef x86}
        cgx86,
 {$endif x86}
-       ncgutil,ngenutil;
+       ncgutil;
 
 
     procedure destroy_hlcodegen;

compiler/htypechk.pas

@@ -26,7 +26,7 @@ unit htypechk;
 interface
 
     uses
-      cclasses,cmsgs,tokens,cpuinfo,
+      cclasses,cmsgs,tokens,
       node,globtype,
       symconst,symtype,symdef,symsym,symbase,
       pgentype;

compiler/i386/aoptcpu.pas

@@ -30,7 +30,7 @@ unit aoptcpu;
 
     uses
       cgbase,
-      cpubase, aoptobj, aoptcpub, aopt, aoptx86,
+      cpubase, aopt, aoptx86,
       Aasmbase,aasmtai,aasmdata;
 
     Type
@@ -52,8 +52,6 @@ unit aoptcpu;
 
     uses
       verbose,globtype,globals,
-      cutils,
-      aoptbase,
       cpuinfo,
       aasmcpu,
       aoptutils,

compiler/import.pas

@@ -25,10 +25,7 @@ unit import;
 interface
 
 uses
-  cutils,cclasses,
-  systems,
-  aasmbase,
-  symdef,symsym;
+  systems;
 
 type
    timportlib=class

compiler/link.pas

@@ -161,7 +161,7 @@ Implementation
       baseunix,
 {$endif hasUnix}
       script,globals,verbose,comphook,ppu,fpccrc,
-      aasmbase,aasmtai,aasmdata,aasmcpu,
+      aasmbase,aasmcpu,
       ogmap;
 
     var

compiler/nadd.pas

@@ -127,7 +127,7 @@ implementation
       {$ifdef state_tracking}
       nstate,
       {$endif}
-      cpuinfo,procinfo;
+      cpuinfo;
 
 
 {*****************************************************************************

compiler/nbas.pas

@@ -27,8 +27,8 @@ interface
 
     uses
        globtype,
-       cpuinfo,cpubase,cgbase,cgutils,
-       aasmbase,aasmtai,aasmdata,aasmcpu,
+       cgbase,cgutils,
+       aasmtai,aasmdata,aasmcpu,
        node,
        symtype;
 
@@ -302,11 +302,10 @@ interface
 implementation
 
     uses
-      cutils,
       verbose,globals,systems,
       symconst,symdef,defutil,defcmp,
       pass_1,
-      nutils,nld,ncal,nflw,
+      nutils,nld,
       procinfo
       ;
 

compiler/ncgadd.pas

@@ -72,11 +72,11 @@ interface
 
     uses
       globtype,systems,
-      cutils,verbose,globals,
-      symconst,symdef,paramgr,
-      aasmbase,aasmtai,aasmdata,defutil,
-      procinfo,pass_2,tgobj,
-      nutils,ncon,nset,ncgutil,cgobj,cgutils,
+      verbose,globals,
+      symconst,symdef,
+      aasmbase,aasmdata,defutil,
+      pass_2,tgobj,
+      nutils,nset,ncgutil,cgobj,cgutils,
       hlcgobj
       ;
 

compiler/ncgbas.pas

@@ -71,11 +71,11 @@ interface
   implementation
 
     uses
-      globals,systems,
+      globals,
       cutils,verbose,
       aasmbase,aasmcpu,
-      symsym,symconst,symdef,defutil,
-      nflw,pass_2,ncgutil,
+      symsym,symconst,defutil,
+      pass_2,ncgutil,
       cgbase,cgobj,hlcgobj,
       procinfo,
       cpuinfo,

compiler/ncgcal.pas

@@ -128,12 +128,10 @@ implementation
 
     uses
       systems,
-      cutils,verbose,globals,
-      cpuinfo,
-      symconst,symbase,symtable,symtype,symsym,defutil,paramgr,
+      verbose,globals,
+      symconst,symtable,symtype,symsym,defutil,paramgr,
       pass_2,
-      aasmbase,aasmtai,
-      nbas,nmem,nld,ncnv,nutils,
+      nld,ncnv,
       ncgutil,blockutl,
       cgobj,tgobj,hlcgobj,
       procinfo,

compiler/ncgcnv.pas

@@ -71,14 +71,13 @@ interface
 
     uses
       cutils,verbose,globtype,globals,
-      aasmbase,aasmtai,aasmdata,aasmcpu,symconst,symdef,symtable,paramgr,
-      nutils,ncon,ncal,
+      aasmbase,aasmdata,symconst,symdef,symtable,
+      nutils,ncon,
       cpubase,systems,
-      procinfo,pass_2,
+      pass_2,
       cgbase,
       cgutils,cgobj,hlcgobj,
       fmodule,
-      ncgutil,
       tgobj
       ;
 

compiler/ncgcon.pas

@@ -29,7 +29,7 @@ interface
     uses
        aasmbase,
        symtype,
-       node,ncon;
+       ncon;
 
     type
        tcgrealconstnode = class(trealconstnode)
@@ -73,10 +73,10 @@ implementation
       globtype,widestr,systems,
       verbose,globals,cutils,
       aasmcnst,
-      symconst,symdef,aasmtai,aasmdata,aasmcpu,defutil,
+      symconst,symdef,aasmtai,aasmdata,defutil,
       cpuinfo,cpubase,
-      cgbase,cgobj,cgutils,
-      ncgutil,hlcgobj,cclasses,tgobj
+      cgbase,cgutils,
+      hlcgobj,cclasses
       ;
 
 

compiler/ncgflw.pas

@@ -28,7 +28,7 @@ interface
 
     uses
       globtype,
-      aasmbase,aasmdata,node,nflw,
+      aasmbase,aasmdata,nflw,
       pass_2,cgutils,ncgutil;
 
     type
@@ -125,11 +125,11 @@ implementation
 
     uses
       cutils,
-      verbose,globals,systems,constexp,
+      verbose,globals,systems,
       symconst,symdef,symsym,symtable,symtype,aasmtai,aasmcpu,defutil,
       procinfo,cgbase,parabase,
       fmodule,
-      cpubase,ncon,
+      cpubase,
       tgobj,paramgr,
       cgobj,hlcgobj,nutils
       ;

compiler/ncginl.pas

@@ -69,13 +69,13 @@ interface
 implementation
 
     uses
-      globtype,systems,constexp,
-      cutils,verbose,globals,
-      symconst,symtype,symdef,defutil,symsym,
-      aasmbase,aasm