render: shapes: Change draw-line to accept vector arguments.
authorDavid Thompson <dthompson2@worcester.edu>
Thu, 26 Jan 2017 03:16:19 +0000 (22:16 -0500)
committerDavid Thompson <dthompson2@worcester.edu>
Thu, 26 Jan 2017 03:16:19 +0000 (22:16 -0500)
* chickadee/render/shapes.scm (draw-line): Replace x1, y1, x2, y2
arguments with start and end arguments that are vec2s.

chickadee/render/shapes.scm

index 0e9c0a1..6981807 100644 (file)
@@ -125,13 +125,17 @@ void main (void) {
   }
 }
 "))))
-    (lambda* (x1 y1 x2 y2 #:key
-                 (thickness 1.0)
-                 (feather 1.0)
-                 (cap 'round)
-                 (color white)
-                 (shader (force default-shader)))
-      (let* ((dx (- x2 x1))
+    (lambda* (start end #:key
+                    (thickness 0.5)
+                    (feather 1.0)
+                    (cap 'round)
+                    (color white)
+                    (shader (force default-shader)))
+      (let* ((x1 (vec2-x start))
+             (y1 (vec2-y start))
+             (x2 (vec2-x end))
+             (y2 (vec2-y end))
+             (dx (- x2 x1))
              (dy (- y2 y1))
              (length (sqrt (+ (expt dx 2) (expt dy 2))))
              (padding (/ (ceiling (+ thickness (* feather 2.5))) 2.0))