From 86f97442575ec383bbed314df662c897b3b11688 Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Sun, 6 Jun 2021 16:39:07 -0700
Subject: [PATCH] .

---
 shell/data.limg | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/shell/data.limg b/shell/data.limg
index c85dd050..7ef4b055 100644
--- a/shell/data.limg
+++ b/shell/data.limg
@@ -5,6 +5,10 @@
     (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))])
+    (when . [(mac (when cond . body)
+  `(if ,cond (do ,@body) ()))])
     (list . [(def (list . args) args)])
     (len . [(def (len l)
   (if (no l)
@@ -15,10 +19,6 @@
     ()
     (cons (f (car xs))
           (map1 f (cdr xs)))))])
-    (let . [(mac (let var val . body)
-  `((fn (,var) ,@body) ,val))])
-    (when . [(mac (when cond . body)
-  `(if ,cond (do ,@body) ()))])
     (++ . [(mac (++ var) `(set ,var (+ ,var 1)))])
     (+= . [(mac (+= var inc)
   `(set ,var (+ ,var ,inc)))])