0022989: BSplCLib::Reparametrize() fails on near knots

[occt.git] / src / BSplCLib / BSplCLib.cxx

diff --git a/src/BSplCLib/BSplCLib.cxx b/src/BSplCLib/BSplCLib.cxx
index 7147f99..e230eb2 100755 (executable)
--- a/src/BSplCLib/BSplCLib.cxx
+++ b/src/BSplCLib/BSplCLib.cxx
@@ -674,7 +674,7 @@ void BSplCLib::Reparametrize
       //for CheckCurveData
       Standard_Real Eps = Epsilon( Abs(Knots(i-1)) );
       if (Knots(i) - Knots(i-1) <= Eps)
-       Knots(i) += 1.1*Eps;
+       Knots(i) = NextAfter (Knots(i-1) + Eps, RealLast());
 
       K1 = K2;
     }