Przeglądaj źródła

* cleanup some unused units from uses clauses

git-svn-id: trunk@22433 -
florian 13 lat temu
rodzic
commit
ca5fabda6d

+ 0 - 1
compiler/aasmbase.pas

@@ -208,7 +208,6 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      SysUtils,
       verbose;
       verbose;
 
 
 
 

+ 3 - 4
compiler/aasmdata.pas

@@ -33,11 +33,10 @@ interface
 
 
     uses
     uses
        cutils,cclasses,
        cutils,cclasses,
-       globtype,globals,systems,
-       cpuinfo,cpubase,
-       cgbase,cgutils,
+       globtype,systems,
+       cgbase,
        symtype,
        symtype,
-       aasmbase,ogbase;
+       aasmbase;
 
 
     type
     type
       { Type of AsmLists. The order is important for the layout of the
       { Type of AsmLists. The order is important for the layout of the

+ 1 - 2
compiler/aasmtai.pas

@@ -829,8 +829,7 @@ implementation
     uses
     uses
       SysUtils,
       SysUtils,
       verbose,
       verbose,
-      globals,
-      fmodule;
+      globals;
 
 
     const
     const
       pputaimarker = 254;
       pputaimarker = 254;

+ 2 - 4
compiler/aggas.pas

@@ -29,9 +29,8 @@ unit aggas;
 interface
 interface
 
 
     uses
     uses
-      cclasses,
       globtype,globals,
       globtype,globals,
-      aasmbase,aasmtai,aasmdata,aasmcpu,
+      aasmbase,aasmtai,aasmdata,
       assemble;
       assemble;
 
 
     type
     type
@@ -104,8 +103,7 @@ implementation
     uses
     uses
       SysUtils,
       SysUtils,
       cutils,cfileutl,systems,
       cutils,cfileutl,systems,
-      fmodule,finput,verbose,
-      itcpugas,cpubase;
+      fmodule,verbose,cpubase;
 
 
     const
     const
       line_length = 70;
       line_length = 70;

+ 4 - 5
compiler/cgobj.pas

@@ -36,7 +36,7 @@ unit cgobj;
   interface
   interface
 
 
     uses
     uses
-       cclasses,globtype,constexp,
+       globtype,constexp,
        cpubase,cgbase,cgutils,parabase,
        cpubase,cgbase,cgutils,parabase,
        aasmbase,aasmtai,aasmdata,aasmcpu,
        aasmbase,aasmtai,aasmdata,aasmcpu,
        symconst,symtype,symdef,rgobj
        symconst,symtype,symdef,rgobj
@@ -573,10 +573,9 @@ unit cgobj;
 implementation
 implementation
 
 
     uses
     uses
-       globals,options,systems,
-       verbose,defutil,paramgr,symsym,
-       tgobj,cutils,procinfo,
-       ncgrtti;
+       globals,systems,
+       verbose,paramgr,symsym,
+       tgobj,cutils,procinfo;
 
 
 {*****************************************************************************
 {*****************************************************************************
                             basic functionallity
                             basic functionallity

+ 3 - 4
compiler/defutil.pas

@@ -26,9 +26,8 @@ unit defutil;
 interface
 interface
 
 
     uses
     uses
-       cclasses,
-       globtype,globals,constexp,node,
-       symconst,symbase,symtype,symdef,
+       globtype,globals,constexp,
+       symconst,symtype,symdef,
        cgbase,cpubase;
        cgbase,cpubase;
 
 
     type
     type
@@ -286,7 +285,7 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-       systems,verbose;
+       verbose;
 
 
     { returns true, if def uses FPU }
     { returns true, if def uses FPU }
     function is_fpu(def : tdef) : boolean;
     function is_fpu(def : tdef) : boolean;

+ 2 - 2
compiler/hlcgobj.pas

@@ -37,7 +37,7 @@ unit hlcgobj;
        cclasses,globtype,constexp,
        cclasses,globtype,constexp,
        cpubase,cgbase,cgutils,parabase,
        cpubase,cgbase,cgutils,parabase,
        aasmbase,aasmtai,aasmdata,aasmcpu,
        aasmbase,aasmtai,aasmdata,aasmcpu,
-       symconst,symtype,symdef,rgobj,
+       symconst,symtype,symdef,
        node
        node
        ;
        ;
 
 
@@ -555,7 +555,7 @@ unit hlcgobj;
 implementation
 implementation
 
 
     uses
     uses
-       globals,options,systems,
+       globals,systems,
        fmodule,export,
        fmodule,export,
        verbose,defutil,paramgr,
        verbose,defutil,paramgr,
        symbase,symsym,symtable,
        symbase,symsym,symtable,

+ 1 - 3
compiler/htypechk.pas

@@ -181,13 +181,11 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-       sysutils,
        systems,constexp,globals,
        systems,constexp,globals,
        cutils,verbose,
        cutils,verbose,
        symtable,
        symtable,
        defutil,defcmp,
        defutil,defcmp,
-       nbas,ncnv,nld,nmem,ncal,nmat,ninl,nutils,ncon,
-       cgbase,procinfo
+       nbas,ncnv,nld,nmem,ncal,nmat,ninl,nutils,procinfo
        ;
        ;
 
 
     type
     type

+ 1 - 3
compiler/ncgflw.pas

@@ -95,10 +95,8 @@ implementation
       verbose,globals,systems,globtype,constexp,
       verbose,globals,systems,globtype,constexp,
       symconst,symdef,symsym,symtable,aasmtai,aasmdata,aasmcpu,defutil,
       symconst,symdef,symsym,symtable,aasmtai,aasmdata,aasmcpu,defutil,
       procinfo,cgbase,pass_2,parabase,
       procinfo,cgbase,pass_2,parabase,
-      cpubase,cpuinfo,
-      nld,ncon,
+      cpubase,ncon,
       tgobj,paramgr,
       tgobj,paramgr,
-      regvars,
       cgutils,cgobj,hlcgobj,nutils
       cgutils,cgobj,hlcgobj,nutils
       ;
       ;
 
 

+ 2 - 3
compiler/ncgld.pas

@@ -69,9 +69,8 @@ implementation
       systems,
       systems,
       verbose,globals,constexp,
       verbose,globals,constexp,
       nutils,
       nutils,
-      symtable,symconst,symdef,symsym,defutil,paramgr,
-      ncnv,ncon,nmem,nbas,ncgrtti,
-      aasmbase,aasmtai,aasmcpu,
+      symtable,symconst,symdef,symsym,defutil,paramgr,ncon,nbas,ncgrtti,
+      aasmbase,
       cgbase,pass_2,
       cgbase,pass_2,
       procinfo,
       procinfo,
       cpubase,parabase,
       cpubase,parabase,

+ 2 - 2
compiler/ncnv.pas

@@ -294,8 +294,8 @@ implementation
    uses
    uses
       globtype,systems,constexp,
       globtype,systems,constexp,
       cutils,verbose,globals,widestr,
       cutils,verbose,globals,widestr,
-      symconst,symdef,symsym,symbase,symtable,
-      ncon,ncal,nset,nadd,ninl,nmem,nmat,nbas,nutils,
+      symconst,symdef,symsym,symtable,
+      ncon,ncal,nset,nadd,nmem,nmat,nbas,nutils,
       cgbase,procinfo,
       cgbase,procinfo,
       htypechk,pass_1,cpuinfo;
       htypechk,pass_1,cpuinfo;
 
 

+ 3 - 3
compiler/nld.pas

@@ -173,13 +173,13 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-      cutils,verbose,globtype,globals,systems,constexp,
+      verbose,globtype,globals,systems,constexp,
       symnot,symtable,
       symnot,symtable,
       defutil,defcmp,
       defutil,defcmp,
       htypechk,pass_1,procinfo,paramgr,
       htypechk,pass_1,procinfo,paramgr,
       cpuinfo,
       cpuinfo,
-      ncon,ninl,ncnv,nmem,ncal,nutils,nbas,
-      cgobj,cgbase
+      ncon,ninl,ncnv,nmem,ncal,nutils,
+      cgbase
       ;
       ;
 
 
 {*****************************************************************************
 {*****************************************************************************

+ 2 - 4
compiler/node.pas

@@ -27,9 +27,7 @@ interface
 
 
     uses
     uses
        cclasses,
        cclasses,
-       globtype,globals,
-       cpubase,cgbase,cgutils,
-       aasmbase,
+       globtype,globals,cgbase,cgutils,
        symtype,
        symtype,
        optbase;
        optbase;
 
 
@@ -482,7 +480,7 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-       cutils,verbose,ppu,comphook,
+       verbose,ppu,comphook,
        symconst,
        symconst,
        nutils,nflw,
        nutils,nflw,
        defutil;
        defutil;

+ 2 - 4
compiler/optcse.pas

@@ -48,12 +48,10 @@ unit optcse;
     uses
     uses
       globtype,globals,
       globtype,globals,
       cutils,cclasses,
       cutils,cclasses,
-      verbose,
       nutils,
       nutils,
-      procinfo,
-      nbas,nld,ninl,ncal,ncnv,nadd,nmem,
+      nbas,nld,ninl,ncal,nadd,nmem,
       pass_1,
       pass_1,
-      symconst,symtype,symdef,symsym,
+      symconst,symdef,symsym,
       defutil,
       defutil,
       optbase;
       optbase;
 
 

+ 1 - 2
compiler/options.pas

@@ -26,7 +26,7 @@ unit options;
 interface
 interface
 
 
 uses
 uses
-  CClasses,cfileutl,
+  cfileutl,
   globtype,globals,verbose,systems,cpuinfo, comprsrc;
   globtype,globals,verbose,systems,cpuinfo, comprsrc;
 
 
 Type
 Type
@@ -90,7 +90,6 @@ uses
   cutils,cmsgs,
   cutils,cmsgs,
   comphook,
   comphook,
   symtable,scanner,rabase,
   symtable,scanner,rabase,
-  wpobase,
   symconst,
   symconst,
   i_bsd;
   i_bsd;
 
 

+ 3 - 9
compiler/pdecl.pas

@@ -50,21 +50,15 @@ interface
 implementation
 implementation
 
 
     uses
     uses
-       SysUtils,
        { common }
        { common }
        cutils,
        cutils,
        { global }
        { global }
        globals,tokens,verbose,widestr,constexp,
        globals,tokens,verbose,widestr,constexp,
-       systems,
-       { aasm }
-       aasmbase,aasmtai,aasmdata,fmodule,
+       systems,aasmdata,fmodule,
        { symtable }
        { symtable }
-       symconst,symbase,symtype,symtable,symcreat,paramgr,defutil,
+       symconst,symbase,symtype,symtable,symcreat,defutil,
        { pass 1 }
        { pass 1 }
-       htypechk,
-       nmat,nadd,ncal,nset,ncnv,ninl,ncon,nld,nflw,nobj,
-       { codegen }
-       ncgutil,ngenutil,
+       htypechk,ninl,ncon,nobj,ngenutil,
        { parser }
        { parser }
        scanner,
        scanner,
        pbase,pexpr,ptype,ptconst,pdecsub,pdecvar,pdecobj,pgenutil,
        pbase,pexpr,ptype,ptconst,pdecsub,pdecvar,pdecobj,pgenutil,

+ 5 - 4
compiler/pdecsub.pas

@@ -96,13 +96,14 @@ implementation
        cutils,cclasses,
        cutils,cclasses,
        { global }
        { global }
        globtype,globals,verbose,constexp,
        globtype,globals,verbose,constexp,
-       systems,fpccrc,
+       systems,
        cpuinfo,
        cpuinfo,
        { symtable }
        { symtable }
-       symbase,symtable,symcreat,defutil,defcmp,paramgr,cpupara,
+       symbase,symtable,defutil,defcmp,
+       { parameter handling }
+       paramgr,cpupara,
        { pass 1 }
        { pass 1 }
-       fmodule,node,htypechk,
-       nmat,nadd,ncal,nset,ncnv,ninl,ncon,nld,nflw,
+       fmodule,node,htypechk,ncon,
        objcutil,
        objcutil,
        { parser }
        { parser }
        scanner,
        scanner,

+ 1 - 3
compiler/pexpr.pas

@@ -70,9 +70,7 @@ implementation
        nmat,nadd,nmem,nset,ncnv,ninl,ncon,nld,nflw,nbas,nutils,
        nmat,nadd,nmem,nset,ncnv,ninl,ncon,nld,nflw,nbas,nutils,
        { parser }
        { parser }
        scanner,
        scanner,
-       pbase,pinline,ptype,pgenutil,
-       { codegen }
-       cgbase,procinfo,cpuinfo
+       pbase,pinline,ptype,pgenutil,procinfo,cpuinfo
        ;
        ;
 
 
     { sub_expr(opmultiply) is need to get -1 ** 4 to be
     { sub_expr(opmultiply) is need to get -1 ** 4 to be

+ 5 - 8
compiler/psub.pas

@@ -26,7 +26,7 @@ unit psub;
 interface
 interface
 
 
     uses
     uses
-      cclasses,globals,
+      globals,
       node,nbas,
       node,nbas,
       symdef,procinfo,optdfa;
       symdef,procinfo,optdfa;
 
 
@@ -90,9 +90,7 @@ implementation
        cutils,
        cutils,
        { global }
        { global }
        globtype,tokens,verbose,comphook,constexp,
        globtype,tokens,verbose,comphook,constexp,
-       systems,
-       { aasm }
-       cpuinfo,cpubase,aasmbase,aasmtai,aasmdata,
+       systems,cpubase,aasmbase,aasmtai,aasmdata,
        { symtable }
        { symtable }
        symconst,symbase,symsym,symtype,symtable,defutil,symcreat,
        symconst,symbase,symsym,symtype,symtable,defutil,symcreat,
        paramgr,
        paramgr,
@@ -108,15 +106,14 @@ implementation
        pass_2,
        pass_2,
 {$endif}
 {$endif}
        { parser }
        { parser }
-       scanner,import,gendef,
+       scanner,gendef,
        pbase,pstatmnt,pdecl,pdecsub,pexports,pgenutil,pparautl,
        pbase,pstatmnt,pdecl,pdecsub,pexports,pgenutil,pparautl,
        { codegen }
        { codegen }
-       tgobj,cgbase,cgobj,cgcpu,hlcgobj,hlcgcpu,dbgbase,
+       tgobj,cgbase,cgobj,hlcgobj,hlcgcpu,dbgbase,
        ncgutil,regvars,
        ncgutil,regvars,
        optbase,
        optbase,
        opttail,
        opttail,
-       optcse,optloop,
-       optutils
+       optcse,optloop
 {$if defined(arm) or defined(avr) or defined(fpc_compiler_has_fixup_jmps)}
 {$if defined(arm) or defined(avr) or defined(fpc_compiler_has_fixup_jmps)}
        ,aasmcpu
        ,aasmcpu
 {$endif arm}
 {$endif arm}

+ 4 - 4
compiler/symdef.pas

@@ -36,9 +36,9 @@ interface
        { node }
        { node }
        node,
        node,
        { aasm }
        { aasm }
-       aasmbase,aasmtai,aasmdata,
+       aasmbase,aasmtai,
        cpubase,cpuinfo,
        cpubase,cpuinfo,
-       cgbase,cgutils,
+       cgbase,
        parabase
        parabase
        ;
        ;
 
 
@@ -1010,9 +1010,9 @@ implementation
       { global }
       { global }
       verbose,
       verbose,
       { target }
       { target }
-      systems,aasmcpu,paramgr,
+      systems,paramgr,
       { symtable }
       { symtable }
-      symsym,symtable,symutil,defutil,objcdef,
+      symsym,symtable,defutil,objcdef,
 {$ifdef jvm}
 {$ifdef jvm}
       jvmdef,
       jvmdef,
 {$endif}
 {$endif}

+ 3 - 10
compiler/symtable.pas

@@ -26,16 +26,11 @@ interface
 
 
     uses
     uses
        { common }
        { common }
-       cutils,cclasses,
-       { global }
-       cpuinfo,globtype,tokens,
+       cutils,cclasses,globtype,tokens,
        { symtable }
        { symtable }
        symconst,symbase,symtype,symdef,symsym,
        symconst,symbase,symtype,symdef,symsym,
        { ppu }
        { ppu }
-       ppu,
-       { assembler }
-       aasmtai,aasmdata
-       ;
+       ppu;
 
 
 
 
 {****************************************************************************
 {****************************************************************************
@@ -346,10 +341,8 @@ implementation
     uses
     uses
       { global }
       { global }
       verbose,globals,
       verbose,globals,
-      { target }
-      systems,
       { symtable }
       { symtable }
-      symutil,defcmp,defutil,
+      symutil,defutil,
       { module }
       { module }
       fmodule,
       fmodule,
       { codegen }
       { codegen }