diff --git a/src/IntTools/IntTools_FaceFace.cxx b/src/IntTools/IntTools_FaceFace.cxx
index b39d5da149..ed1f19b81d 100755
--- a/src/IntTools/IntTools_FaceFace.cxx
+++ b/src/IntTools/IntTools_FaceFace.cxx
@@ -780,7 +780,7 @@ void IntTools_FaceFace::SetList(IntSurf_ListOfPntOn2S& aListOfPnts)
     //ZZ
     if (aNbLin) {// Check the distances
       Standard_Integer i, aNbP, j ;
-      Standard_Real aT, aT1, aT2, dT, aD2, aD2Max, aEps, aT11, aT12;
+      Standard_Real aT1, aT2, dT, aD2, aD2Max, aEps, aT11, aT12;
       //
       aD2Max=0.;
       aNbLin=mySeqOfCurve.Length();
diff --git a/src/QABugs/QABugs_11.cxx b/src/QABugs/QABugs_11.cxx
index c3c954aaee..96310782cc 100644
--- a/src/QABugs/QABugs_11.cxx
+++ b/src/QABugs/QABugs_11.cxx
@@ -5310,7 +5310,7 @@ Standard_Integer bcarray (Draw_Interpretor& di, Standard_Integer argc, const cha
     return 1;
   }
 
-  Standard_Integer i, aNb, aBL;
+  Standard_Integer i, aBL;
   BOPTColStd_CArray1OfInteger aC;
   //
   aBL=100000;
diff --git a/src/QANewDBRepNaming/QANewDBRepNaming.cxx b/src/QANewDBRepNaming/QANewDBRepNaming.cxx
index 6e62f20f4d..24c4e3fa05 100755
--- a/src/QANewDBRepNaming/QANewDBRepNaming.cxx
+++ b/src/QANewDBRepNaming/QANewDBRepNaming.cxx
@@ -150,9 +150,8 @@ static Standard_Integer QANewDBRepNaming_CheckNaming(Draw_Interpretor& di,Standa
   TopExp::MapShapes(aSelectedShape, allSubShapes);
 //  cout<<"SELECTION ..."<<endl;
 //  cout << "i = " << allSubShapes.Extent() << endl;
-  Standard_Integer count = 0, j, i;
+  Standard_Integer count = 0, i;
   char aDrawName[80] = "Select";
-  char aDrawNumber[10];
 
   for (i = 1; i <= allSubShapes.Extent(); i++) {
     const TDF_Label& aSubLabel = L.FindChild(i);