~jl2/blend2d-surface

88d7e2ad38685b403d93d4d3fc1aa315c343f6da — Jeremiah LaRocco 1 year, 10 months ago afd7fe6 master
Fix type-error on CCL.
1 files changed, 1 insertions(+), 1 deletions(-)

M blend2d-surface.lisp
M blend2d-surface.lisp => blend2d-surface.lisp +1 -1
@@ 52,7 52,7 @@
    (dotimes (i 2000)
        (let* ((sx (random (coerce size 'double-float)))
               (sy (random (coerce size 'double-float)))
               (radius (random (/ size 50.0))))
               (radius (coerce (random (/ size 50.0)) 'double-float)))

          (setf (bl:circle.cx circle) sx)
          (setf (bl:circle.cy circle) sy)