* removed unused vars

compiler/cgai386.pas

@@ -3118,8 +3118,6 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister);
 {$endif GDB}
       hr : preference;
       p : psymtable;
-      hp : preference;
-      pp : pprocinfo;
       r : treference;
       oldlist,
       oldexprasmlist : paasmoutput;
@@ -3899,7 +3897,10 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister);
 end.
 {
   $Log$
-  Revision 1.96  2000-04-10 12:23:18  jonas
+  Revision 1.97  2000-04-24 12:48:37  peter
+    * removed unused vars
+
+  Revision 1.96  2000/04/10 12:23:18  jonas
     * modified copyshortstring so it takes an extra paramter which allows it
       to delete the sref itself (so the reg deallocations are put in the
       right place for the optimizer)

compiler/psub.pas

@@ -670,9 +670,6 @@ end;
 
 
 procedure resetvaluepara(p:pnamedindexobject);{$ifndef FPC}far;{$endif}
-var
-  vs : pvarsym;
-  s  : string;
 begin
   if psym(p)^.typ=varsym then
     with pvarsym(p)^ do
@@ -680,6 +677,7 @@ begin
           aktprocsym^.definition^.parast^.symsearch^.rename(name,copy(name,4,length(name)));
 end;
 
+
 procedure pd_cdecl(const procnames:Tstringcontainer);
 begin
   if aktprocsym^.definition^.deftype<>procvardef then
@@ -2014,7 +2012,10 @@ end.
 
 {
   $Log$
-  Revision 1.56  2000-03-31 22:56:47  pierre
+  Revision 1.57  2000-04-24 12:48:37  peter
+    * removed unused vars
+
+  Revision 1.56  2000/03/31 22:56:47  pierre
     * fix the handling of value parameters in cdecl function
 
   Revision 1.55  2000/03/27 11:57:22  pierre

compiler/tccal.pas

@@ -400,7 +400,9 @@ implementation
 
          { only Dummy }
          hcvt : tconverttype;
+{$ifdef m68k}
          regi : tregister;
+{$endif}
          method_must_be_valid : boolean;
       label
         errorexit;
@@ -1231,7 +1233,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.83  2000-04-02 18:30:12  florian
+  Revision 1.84  2000-04-24 12:48:38  peter
+    * removed unused vars
+
+  Revision 1.83  2000/04/02 18:30:12  florian
     * fixed another problem with readln(<floating point register variable>);
     * the register allocator takes now care of necessary pushes/pops for
       readln/writeln