Update

src/IntTools/IntTools_BeanFaceIntersector.cxx

@@ -1154,6 +1154,7 @@ void IntTools_BeanFaceIntersector::ComputeRangeFromStartPoint(const Standard_Boo
 
   Standard_Boolean isboundaryindex = Standard_False;
   Standard_Boolean isvalidindex = Standard_True;
+  
   while((aDelta >= aMinDelta) && (loopcounter <= 10)) {
     Standard_Boolean pointfound = Standard_False;
 
@@ -1181,11 +1182,13 @@ void IntTools_BeanFaceIntersector::ComputeRangeFromStartPoint(const Standard_Boo
         break;
     }
     else {
-      aDeltaRestrictor *= 0.5;
+      aDeltaRestrictor = aDelta;
     }
     
-    // Increase step if point was found, decrease otherwise
+    // if point found decide to increase aDelta using derivative of distance function
-    aDelta *= (pointfound ? 2. : 0.5);
+    //
+    
+    aDelta = (pointfound) ? (aDelta * 2.) : (aDelta * 0.5);
     aDelta = (aDelta < aDeltaRestrictor) ? aDelta : aDeltaRestrictor;
 
     aCurPar = (ToIncreaseParameter) ? (aPrevPar + aDelta) : (aPrevPar - aDelta);
@@ -1194,7 +1197,7 @@ void IntTools_BeanFaceIntersector::ComputeRangeFromStartPoint(const Standard_Boo
     // prevent infinite loop when (aPrevPar +/- aDelta) == aPrevPar == 0.
     //
     
-    if (Abs (aCurPar - aPrevPar) < myCurveResolution) 
+    if( aCurPar == aPrevPar )
       break;
     
     BoundaryCondition  = (ToIncreaseParameter) ? (aCurPar > aCurrentRange.Last()) : (aCurPar < aCurrentRange.First());

tests/perf/modalg/bug29144

@@ -1,27 +0,0 @@
-puts "========"
-puts "0029144: Modeling Algorithms - BOP PaveFiller hangs in some case"
-puts "========"
-puts ""
-
-puts "TODO OCC29145 ALL : Faulty shapes in variables faulty_1 to faulty_"
-
-bclearobjects;
-bcleartools;
-
-restore [locate_data_file bug29093_hung3.brep] a
-explode a So
-baddobjects a_7
-baddtools a_11
-
-dchrono cr restart
-
-bfillds
-bbuild result
-
-dchrono cr stop counter bbuild
-
-checkshape result
-checkprops result -s 1313890 -v 46778600
-checknbshapes result -vertex 9 -edge 20 -wire 12 -face 12 -shell 3 -solid 3 
-
-checkview -display result -2d -path ${imagedir}/${test_image}.png

upgrade.bat

@@ -1,5 +1,5 @@
 @echo off
-
+rem test1
 rem Helper script to run procedure of automatic upgrade of application code
 rem on newer version of OCCT on Windows.
 rem Running it requires that Tcl should be in the PATH