Commit 12f42a2f authored by Dave Cooper's avatar Dave Cooper
Browse files

avoid finalizing copied curves going into compatible-curves, to avoid crashes...

avoid finalizing copied curves going into compatible-curves, to avoid crashes apparently caused by this.
parent b005c94b
......@@ -68,7 +68,9 @@ to be compatible in terms of number of control points, knot vectors, and degree.
(approximated-compatible-curves *geometry-kernel*
(the curve-list) :tolerance (the tolerance))
(return-compatible-curves *geometry-kernel*
(mapsend (the curve-list) :copy-new)))))
(mapcar #'(lambda(curve)
(the-object curve (copy-new :finalize? nil)))
(the curve-list))))))
:objects (("Sequence of GDL Curve objects. These are the resultant curves which
are supposed to be compatible."
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment