7775

baremetal/shell/main.mu

@@ -17,21 +17,3 @@ fn main {
     loop
   }
 }
-
-fn run in: (addr gap-buffer), out: (addr stream byte) {
-  # tokenize
-  # insert parens
-  # transform infix
-  # token tree
-  # syntax tree
-  rewind-gap-buffer in
-  clear-stream out
-  {
-    var done?/eax: boolean <- gap-buffer-scan-done? in
-    compare done?, 0/false
-    break-if-!=
-    var g/eax: grapheme <- read-from-gap-buffer in
-    write-grapheme out, g
-    loop
-  }
-}

baremetal/shell/sandbox.mu

@@ -90,3 +90,21 @@ fn edit-sandbox _self: (addr sandbox), key: byte {
   }
   add-grapheme-to-sandbox self, g
 }
+
+fn run in: (addr gap-buffer), out: (addr stream byte) {
+  # tokenize
+  # insert parens
+  # transform infix
+  # token tree
+  # syntax tree
+  rewind-gap-buffer in
+  clear-stream out
+  {
+    var done?/eax: boolean <- gap-buffer-scan-done? in
+    compare done?, 0/false
+    break-if-!=
+    var g/eax: grapheme <- read-from-gap-buffer in
+    write-grapheme out, g
+    loop
+  }
+}