diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2021-06-04 16:41:18 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2021-06-04 16:41:18 -0700 |
| commit | cfb5dbce59de941bf81bb5c7859945d58d0c6e65 (patch) | |
| tree | c502317128b0065f92081055e11004936165f796 | |
| parent | e683a3fdee9cb11ea713a20a47163384ac5c75ad (diff) | |
| download | mu-cfb5dbce59de941bf81bb5c7859945d58d0c6e65.tar.gz | |
.
| -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))]) |