diff options
-rw-r--r-- | shell/data.limg | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/shell/data.limg b/shell/data.limg index 88adeeee..c61ebe98 100644 --- a/shell/data.limg +++ b/shell/data.limg @@ -21,8 +21,8 @@ (- 0 (abs (- y1 y0))) (sgn (- x1 x0)) (sgn (- y1 y0))))) - (brline1 . (fn () (screen x y xmax ymax dx dy sx sy err color) - (while (or (< x xmax) (< y ymax)) + (brline1 . (fn () (screen x y xlast ylast dx dy sx sy err color) + (while (not (and (= x xlast) (= y ylast))) (pixel screen x y color) ((fn (e2) (if (>= e2 dy) |