diff options
Diffstat (limited to 'shell/data.limg')
-rw-r--r-- | shell/data.limg | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/shell/data.limg b/shell/data.limg index c54a1229..88adeeee 100644 --- a/shell/data.limg +++ b/shell/data.limg @@ -12,16 +12,6 @@ (hline1 screen y 0 (width screen) color))) (vline . (fn () (screen y color) (vline1 screen y 0 (height screen) color))) - (andf . (fn () (a b) - (if a - (if b - 1 - ()) - ()))) - (orf . (fn () (a b) - (if a - a - b))) (brline . (fn () (screen x0 y0 x1 y1 color) ((fn (dx dy sx sy) ((fn (err) @@ -32,7 +22,7 @@ (sgn (- x1 x0)) (sgn (- y1 y0))))) (brline1 . (fn () (screen x y xmax ymax dx dy sx sy err color) - (while (orf (< x xmax) (< y ymax)) + (while (or (< x xmax) (< y ymax)) (pixel screen x y color) ((fn (e2) (if (>= e2 dy) |