Browse Source

* remove unused units from uses statements

git-svn-id: trunk@23306 -
florian 12 years ago
parent
commit
47d43750e4

+ 2 - 2
compiler/arm/aasmcpu.pas

@@ -26,7 +26,7 @@ unit aasmcpu;
 interface
 interface
 
 
 uses
 uses
-  cclasses,globtype,globals,verbose,
+  globtype,globals,verbose,
   aasmbase,aasmtai,aasmdata,aasmsym,
   aasmbase,aasmtai,aasmdata,aasmsym,
   ogbase,
   ogbase,
   symtype,
   symtype,
@@ -270,7 +270,7 @@ uses
 implementation
 implementation
 
 
   uses
   uses
-    cutils,rgobj,itcpugas,aoptcpu;
+    itcpugas,aoptcpu;
 
 
 
 
     procedure taicpu.loadshifterop(opidx:longint;const so:tshifterop);
     procedure taicpu.loadshifterop(opidx:longint;const so:tshifterop);

+ 1 - 1
compiler/arm/agarmgas.pas

@@ -30,7 +30,7 @@ unit agarmgas;
 
 
     uses
     uses
        globtype,
        globtype,
-       aasmtai,aasmdata,
+       aasmtai,
        aggas,
        aggas,
        cpubase,cpuinfo;
        cpubase,cpuinfo;
 
 

+ 1 - 1
compiler/arm/aoptcpu.pas

@@ -30,7 +30,7 @@ Unit aoptcpu;
 
 
 Interface
 Interface
 
 
-uses cgbase, cpubase, aasmtai, aasmcpu,aopt, aoptcpub, aoptobj, cclasses;
+uses cgbase, cpubase, aasmtai, aasmcpu,aopt, aoptobj;
 
 
 Type
 Type
   TCpuAsmOptimizer = class(TAsmOptimizer)
   TCpuAsmOptimizer = class(TAsmOptimizer)

+ 2 - 2
compiler/arm/cgcpu.pas

@@ -32,7 +32,7 @@ unit cgcpu;
        cgbase,cgutils,cgobj,
        cgbase,cgutils,cgobj,
        aasmbase,aasmcpu,aasmtai,aasmdata,
        aasmbase,aasmcpu,aasmtai,aasmdata,
        parabase,
        parabase,
-       cpubase,cpuinfo,node,cg64f32,rgcpu;
+       cpubase,cpuinfo,cg64f32,rgcpu;
 
 
 
 
     type
     type
@@ -186,7 +186,7 @@ unit cgcpu;
 
 
 
 
     uses
     uses
-       globals,verbose,systems,cutils,sysutils,
+       globals,verbose,systems,cutils,
        aopt,aoptcpu,
        aopt,aoptcpu,
        fmodule,
        fmodule,
        symconst,symsym,
        symconst,symsym,

+ 0 - 2
compiler/arm/cpubase.pas

@@ -32,10 +32,8 @@ unit cpubase;
   interface
   interface
 
 
     uses
     uses
-      cutils,cclasses,
       globtype,globals,
       globtype,globals,
       cpuinfo,
       cpuinfo,
-      aasmbase,
       cgbase
       cgbase
       ;
       ;
 
 

+ 1 - 3
compiler/arm/cpupara.pas

@@ -28,9 +28,8 @@ unit cpupara;
 
 
     uses
     uses
        globtype,globals,
        globtype,globals,
-       aasmtai,aasmdata,
        cpuinfo,cpubase,cgbase,cgutils,
        cpuinfo,cpubase,cgbase,cgutils,
-       symconst,symbase,symtype,symdef,parabase,paramgr;
+       symconst,symtype,symdef,parabase,paramgr;
 
 
     type
     type
        tarmparamanager = class(tparamanager)
        tarmparamanager = class(tparamanager)
@@ -53,7 +52,6 @@ unit cpupara;
 
 
     uses
     uses
        verbose,systems,cutils,
        verbose,systems,cutils,
-       rgobj,
        defutil,symsym,symtable;
        defutil,symsym,symtable;
 
 
 
 

+ 1 - 2
compiler/arm/cpupi.pas

@@ -47,9 +47,8 @@ unit cpupi;
     uses
     uses
        globals,systems,
        globals,systems,
        cpubase,
        cpubase,
-       aasmtai,aasmdata,
        tgobj,
        tgobj,
-       symconst,symsym,paramgr,
+       symconst,paramgr,
        cgbase,cgutils,
        cgbase,cgutils,
        cgobj;
        cgobj;
 
 

+ 1 - 1
compiler/arm/itcpugas.pas

@@ -43,7 +43,7 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      cutils,verbose,rgbase;
+      rgbase;
 
 
     const
     const
       gas_regname_table : TRegNameTable = (
       gas_regname_table : TRegNameTable = (

+ 7 - 10
compiler/arm/narmadd.pas

@@ -46,16 +46,13 @@ interface
   implementation
   implementation
 
 
     uses
     uses
-      globtype,systems,
-      cutils,verbose,globals,
-      constexp,
-      symconst,symdef,paramgr,symtable,symtype,
-      aasmbase,aasmtai,aasmdata,aasmcpu,defutil,htypechk,
-      cgbase,cgutils,cgcpu,
-      cpuinfo,pass_1,pass_2,regvars,procinfo,
-      cpupara,
-      ncon,nset,nadd,ncnv,ncal,nmat,
-      ncgutil,tgobj,rgobj,rgcpu,cgobj,cg64f32,
+      globtype,verbose,globals,
+      constexp,symdef,symtable,symtype,
+      aasmbase,aasmdata,aasmcpu,defutil,htypechk,
+      cgbase,cgutils,
+      cpuinfo,pass_1,procinfo,
+      ncon,nadd,ncnv,ncal,nmat,
+      ncgutil,cgobj,
       hlcgobj
       hlcgobj
       ;
       ;
 
 

+ 2 - 4
compiler/arm/narmcal.pas

@@ -26,7 +26,7 @@ unit narmcal;
 interface
 interface
 
 
     uses
     uses
-      symdef,node,ncal,ncgcal;
+      symdef,ncal,ncgcal;
 
 
     type
     type
        tarmcallnode = class(tcgcallnode)
        tarmcallnode = class(tcgcallnode)
@@ -38,10 +38,8 @@ implementation
   uses
   uses
     verbose,globtype,globals,aasmdata,
     verbose,globtype,globals,aasmdata,
     symconst,
     symconst,
-    cgbase,
-    cpubase,cpuinfo,
+    cgbase,cpuinfo,
     ncgutil,
     ncgutil,
-    paramgr,
     systems;
     systems;
 
 
   procedure tarmcallnode.set_result_location(realresdef: tstoreddef);
   procedure tarmcallnode.set_result_location(realresdef: tstoreddef);

+ 4 - 7
compiler/arm/narmcnv.pas

@@ -26,7 +26,7 @@ unit narmcnv;
 interface
 interface
 
 
     uses
     uses
-      node,ncnv,ncgcnv,defcmp;
+      node,ncnv,ncgcnv;
 
 
     type
     type
        tarmtypeconvnode = class(tcgtypeconvnode)
        tarmtypeconvnode = class(tcgtypeconvnode)
@@ -58,15 +58,12 @@ interface
 implementation
 implementation
 
 
    uses
    uses
-      verbose,globtype,globals,systems,
-      symconst,symdef,aasmbase,aasmtai,aasmdata,symtable,
+      verbose,globtype,globals,symdef,aasmbase,aasmtai,aasmdata,symtable,
       defutil,
       defutil,
       cgbase,cgutils,
       cgbase,cgutils,
-      pass_1,pass_2,procinfo,
-      ncon,ncal,
+      pass_1,pass_2,procinfo,ncal,
       ncgutil,
       ncgutil,
-      cpubase,cpuinfo,aasmcpu,
-      rgobj,tgobj,cgobj,hlcgobj,cgcpu;
+      cpubase,cpuinfo,aasmcpu,cgobj,hlcgobj,cgcpu;
 
 
 
 
 {*****************************************************************************
 {*****************************************************************************

+ 2 - 3
compiler/arm/narmcon.pas

@@ -26,7 +26,7 @@ unit narmcon;
 interface
 interface
 
 
     uses
     uses
-      node,ncgcon,cpubase;
+      ncgcon,cpubase;
 
 
     type
     type
       tarmrealconstnode = class(tcgrealconstnode)
       tarmrealconstnode = class(tcgrealconstnode)
@@ -39,8 +39,7 @@ interface
       verbose,
       verbose,
       globtype,globals,
       globtype,globals,
       cpuinfo,
       cpuinfo,
-      aasmbase,aasmtai,aasmdata,
-      symconst,symdef,
+      aasmbase,aasmtai,aasmdata,symdef,
       defutil,
       defutil,
       cgbase,cgutils,
       cgbase,cgutils,
       procinfo,
       procinfo,

+ 4 - 10
compiler/arm/narminl.pas

@@ -58,16 +58,10 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      globtype,systems,
-      cutils,verbose,globals,fmodule,
-      cpuinfo, defutil,
-      symconst,symdef,
-      aasmbase,aasmtai,aasmdata,aasmcpu,
-      cgbase,cgutils,
-      pass_1,pass_2,
-      cpubase,paramgr,
-      nbas,ncon,ncal,ncnv,nld,
-      tgobj,ncgutil,cgobj,cg64f32,rgobj,rgcpu,cgcpu, hlcgobj;
+      globtype,verbose,globals,
+      cpuinfo, defutil,symdef,aasmdata,aasmcpu,
+      cgbase,cgutils,pass_2,
+      cpubase,ncgutil,cgobj,cgcpu, hlcgobj;
 
 
 {*****************************************************************************
 {*****************************************************************************
                               tarminlinenode
                               tarminlinenode

+ 2 - 2
compiler/arm/narmmat.pas

@@ -51,7 +51,7 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      globtype,systems,
+      globtype,
       cutils,verbose,globals,constexp,
       cutils,verbose,globals,constexp,
       aasmbase,aasmcpu,aasmtai,aasmdata,
       aasmbase,aasmcpu,aasmtai,aasmdata,
       defutil,
       defutil,
@@ -60,7 +60,7 @@ implementation
       pass_2,procinfo,
       pass_2,procinfo,
       ncon,ncnv,ncal,
       ncon,ncnv,ncal,
       cpubase,cpuinfo,
       cpubase,cpuinfo,
-      ncgutil,cgcpu,
+      ncgutil,
       nadd,pass_1,symdef;
       nadd,pass_1,symdef;
 
 
 {*****************************************************************************
 {*****************************************************************************

+ 2 - 8
compiler/arm/narmmem.pas

@@ -27,8 +27,7 @@ interface
 
 
     uses
     uses
       globtype,
       globtype,
-      cgbase,cpuinfo,cpubase,
-      node,nmem,ncgmem;
+      cgbase,cpubase,nmem,ncgmem;
 
 
     type
     type
       tarmvecnode = class(tcgvecnode)
       tarmvecnode = class(tcgvecnode)
@@ -38,12 +37,7 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      systems,
-      cutils,verbose,
-      symdef,paramgr,
-      aasmtai,aasmdata,aasmcpu,
-      nld,ncon,nadd,
-      cgutils,cgobj;
+      cutils,verbose,aasmdata,aasmcpu,cgobj;
 
 
 {*****************************************************************************
 {*****************************************************************************
                              TARMVECNODE
                              TARMVECNODE

+ 3 - 7
compiler/arm/narmset.pas

@@ -27,7 +27,7 @@ interface
 
 
     uses
     uses
       globtype,
       globtype,
-      symtype,symdef,
+      symtype,
       cgbase,
       cgbase,
       node,nset,pass_1,ncgset;
       node,nset,pass_1,ncgset;
 
 
@@ -51,13 +51,9 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      systems,
-      verbose,globals,constexp,
-      symconst,defutil,
+      globals,constexp,defutil,
       aasmbase,aasmtai,aasmdata,aasmcpu,
       aasmbase,aasmtai,aasmdata,aasmcpu,
-      pass_2,
-      ncon,
-      cpubase,cpuinfo,procinfo,
+      cpubase,cpuinfo,
       cgutils,cgobj,ncgutil,
       cgutils,cgobj,ncgutil,
       cgcpu,hlcgobj;
       cgcpu,hlcgobj;
 
 

+ 4 - 10
compiler/arm/raarmgas.pas

@@ -54,19 +54,13 @@ Unit raarmgas;
       { helpers }
       { helpers }
       cutils,
       cutils,
       { global }
       { global }
-      globtype,globals,verbose,
-      systems,
-      { aasm }
-      cpuinfo,aasmbase,aasmtai,aasmdata,aasmcpu,
+      globtype,verbose,
+      systems,aasmbase,aasmtai,aasmdata,aasmcpu,
       { symtable }
       { symtable }
-      symconst,symbase,symtype,symsym,symtable,
-      { parser }
-      scanner,
+      symconst,symsym,
       procinfo,
       procinfo,
-      itcpugas,
       rabase,rautils,
       rabase,rautils,
-      cgbase,cgutils,cgobj
-      ;
+      cgbase,cgutils;
 
 
 
 
     function tarmattreader.is_register(const s:string):boolean;
     function tarmattreader.is_register(const s:string):boolean;

+ 1 - 1
compiler/arm/rgcpu.pas

@@ -63,7 +63,7 @@ unit rgcpu;
   implementation
   implementation
 
 
     uses
     uses
-      verbose, cutils,globtype,globals,cpuinfo,
+      verbose,globtype,globals,cpuinfo,
       cgobj,
       cgobj,
       procinfo;
       procinfo;