replace 'circle' with Mu implementation

1 files changed, 0 insertions, 18 deletions

diff --git a/shell/data.limg b/shell/data.limg
index c9c00dbc..407af097 100644
--- a/shell/data.limg
+++ b/shell/data.limg
@@ -140,24 +140,6 @@
     (fill_rect . [def (fill_rect screen x1 y1 x2 y2 color)
   for y y1 (y < y2) ++y
     (hline screen y x1 x2 color)])
-    (circle . [def (circle scr cx cy r clr)
-  with (x (0 - r)
-        y 0
-        err (2 - 2*r)
-        continue? 1)
-    while continue?
-      (pixel scr cx-x cy+y clr)
-      (pixel scr cx-y cy-x clr)
-      (pixel scr cx+x cy-y clr)
-      (pixel scr cx+y cy+x clr)
-      (set r err)
-      when (r <= y)
-        ++y
-        err += (2*y + 1)
-      when (or (r > x) (err > y))
-        ++x
-        err += (2*x + 1)
-      set continue? (x < 0)])
     (ring . [def (ring screen cx cy r0 w clr)
   for r r0 (r < r0+w) ++r
     (circle screen cx cy r clr)])