Add polygon drawing primitive (#314)

2 files changed, 31 insertions, 0 deletions

diff --git a/tests/ref/visualize/polygon.png b/tests/ref/visualize/polygon.png
new file mode 100644
index 00000000..d2a86a53
--- /dev/null
+++ b/tests/ref/visualize/polygon.png
diff --git a/tests/typ/visualize/polygon.typ b/tests/typ/visualize/polygon.typ
new file mode 100644
index 00000000..defd89be
--- /dev/null
+++ b/tests/typ/visualize/polygon.typ
@@ -0,0 +1,31 @@
+// Test polygons.
+
+---
+#set page(height: 220pt, width: 50pt)
+#box({
+  set polygon(stroke: 0.75pt, fill: blue)
+  polygon((0em, 0pt))
+  // this should not give an error
+  polygon()
+  polygon((0pt, 0pt), (10pt, 0pt))
+  polygon((5pt, 0pt), (0pt, 10pt), (10pt, 10pt))
+  polygon(
+    (0pt, 0pt), (5pt, 5pt), (10pt, 0pt),
+    (15pt, 5pt),
+    (5pt, 10pt)
+  )
+  polygon(stroke: none, (5pt, 0pt), (0pt, 10pt), (10pt, 10pt))
+  polygon(stroke: 3pt, fill: none, (5pt, 0pt), (0pt, 10pt), (10pt, 10pt))
+  // relative size
+  polygon((0pt, 0pt), (100%, 5pt), (50%, 10pt))
+  // antiparallelogram
+  polygon((0pt, 5pt), (5pt, 0pt), (0pt, 10pt), (5pt, 15pt))
+  // self-intersections
+  polygon((0pt, 10pt), (30pt, 20pt), (0pt, 30pt), (20pt, 0pt), (20pt, 35pt))
+})
+
+---
+// Test errors.
+
+// Error: 10-17 point array must contain exactly two entries
+#polygon((50pt,))
\ No newline at end of file