Swapped stroke-width and stroke-color params, fixes #82

examples/demo/branch.lisp

@@ -7,7 +7,7 @@
     (
       (scale 0.95) 
       (stroke 
-        (line 0 0 100 100) 2 "white") 
+        (line 0 0 100 100) "white" 2) 
       (move 100 100) 
       (pushTransform) 
       (rotate 

examples/demo/fog.lisp

@@ -11,7 +11,7 @@
 ))
 ;
 (defn when-animate () (
-  (stroke (line prev-pos:x prev-pos:y mouse-pos:x mouse-pos:y) 4 "#72dec2")
+  (stroke (line prev-pos:x prev-pos:y mouse-pos:x mouse-pos:y) "#72dec2" 4)
   (move frame-rect:c frame-rect:m)
   (rotate 0.002)
   (scale 0.998)

examples/demo/spiral.lisp

@@ -9,7 +9,7 @@
       (def spiral-y (add frame-rect:m (mul (sin (div v 11)) (div v 2))))
       (def spiral-r (div v 2))
       ; draw
-      (stroke (circle spiral-x spiral-y spiral-r) 1 "rgba(114,222,194,0.1)") (rec (sub v 0.3))))) 
+      (stroke (circle spiral-x spiral-y spiral-r) "rgba(114,222,194,0.1)" 1) (rec (sub v 0.3))))) 
 ;
 (defn redraw () (
   (clear) 

examples/demo/stars.lisp

@@ -29,7 +29,7 @@
   (
     (stroke 
       (line cx cy (:x (circle-pos cx cy r a)) (:y (circle-pos cx cy r a))
-        ) 2 "white")))
+        ) "white" 2)))
 ;
 (defn draw-star 
   (cx cy r c)