From 6f6f6384f1e5fe46636af28f8e7d4ca3cbea655c Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Thu, 24 Jun 2021 14:33:22 -0700 Subject: . --- shell/data.limg | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/shell/data.limg b/shell/data.limg index 3e3b7912..0c46da98 100644 --- a/shell/data.limg +++ b/shell/data.limg @@ -162,8 +162,8 @@ with (x (0 - r) y 0 err (2 - 2*r) - continue 1) - while continue + 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) @@ -175,7 +175,7 @@ when (or (r > x) (err > y)) ++x err += (2*x + 1) - set continue (x < 0)]) + 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)]) -- cgit 1.4.1-2-gfad0