From 5b1ec1ac84b6a71036811689ac4d76cd3f6e100c Mon Sep 17 00:00:00 2001
From: Karl Smeltzer <karl.smeltzer@gmail.com>
Date: Wed, 4 Apr 2018 13:02:00 -0700
Subject: [PATCH] support anti-clockwise arcs

---
 src/Graphics/Canvas.js   | 2 +-
 src/Graphics/Canvas.purs | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Graphics/Canvas.js b/src/Graphics/Canvas.js
index cbbd541..a0b796b 100644
--- a/src/Graphics/Canvas.js
+++ b/src/Graphics/Canvas.js
@@ -230,7 +230,7 @@ exports.closePath = function(ctx) {
 exports.arc = function(ctx) {
     return function(a) {
         return function() {
-            ctx.arc(a.x, a.y, a.r, a.start, a.end);
+            ctx.arc(a.x, a.y, a.r, a.start, a.end, a.clockwise);
         };
     };
 };
diff --git a/src/Graphics/Canvas.purs b/src/Graphics/Canvas.purs
index 666dfd5..0748036 100644
--- a/src/Graphics/Canvas.purs
+++ b/src/Graphics/Canvas.purs
@@ -418,6 +418,7 @@ type Arc =
   , r :: Number
   , start :: Number
   , end   :: Number
+  , anti :: Boolean
   }
 
 -- | Render an arc object.