diff options
Diffstat (limited to 'shell/data.limg')
-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 281afa3a..47d55891 100644 --- a/shell/data.limg +++ b/shell/data.limg @@ -5,8 +5,8 @@ (do . [(mac do body `((fn () ,@body)))]) (let . [(mac let (var val . body) `((fn (,var) ,@body) ,val))]) - (when . [(mac when (cond . body) - `(if ,cond (do ,@body) ()))]) + (when . [(mac when (cond body) + `(if ,cond ,body ()))]) (hline1 . [(def hline1 (fn (screen y x xmax color) (while (< x xmax) (pixel screen x y color) |