arc infinite recursion

[qazmonk]

Hello,

I have found that running this test program with SBCL 1.2.1 produces infinite calls to VECTO::APPROXIMATE-ARC. Do you have any idea what is going wrong here?

(defpackage :arc-test
  (:use :cl :vecto))
(in-package :arc-test)

(defun test ()
  (with-canvas (:width 600 :height 600)
    (arc 255.98781 199.0003 30 -2.1191545 2.1779017)
    (save-png (open "arc-test.png" :if-does-not-exist :create))))

EDIT: I did some testing and it seems as though it fails if angle1 is less than -PI/2

[xach]

I can't reproduce from the test code. I believe this was fixed in 4be3ce9 a few years ago. What version of Vecto are you using?

[qazmonk]

Ah I had 1.4.7 for some reason. Thanks!