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 ef8c4828..21d54749 100644 --- a/shell/data.limg +++ b/shell/data.limg @@ -2,8 +2,8 @@ (globals . ( (mac . [(define mac (litmac litfn () (name params . body) `(define ,name (litmac litfn () ,params ,@body))))]) - (def . [(define def (litmac litfn () ((name . params) . body) - `(define ,name (fn ,params ,@body))))]) + (def . [(mac def ((name . params) . body) + `(define ,name (fn ,params ,@body)))]) (do . [(mac do body `((fn () ,@body)))]) (let . [(mac let (var val . body) `((fn (,var) ,@body) ,val))]) |