diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-10-10 15:09:16 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-10-10 15:09:16 -0700 |
commit | dad7fb36596a65a8393505938ab7f410a7d7d8e5 (patch) | |
tree | 12dc688909e81834042e3b22a7cacefb2bc6219b | |
parent | 630e93635c1fe2f0c2bde7823ddeb49fb48f6872 (diff) | |
download | mu-dad7fb36596a65a8393505938ab7f410a7d7d8e5.tar.gz |
124
-rw-r--r-- | mu.arc | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/mu.arc b/mu.arc index 9859be1c..2f1fadf7 100644 --- a/mu.arc +++ b/mu.arc @@ -1,4 +1,4 @@ -; what happens when our virtual machine starts up +;; what happens when our virtual machine starts up (= initialization-fns* (queue)) (def reset () (each f (as cons initialization-fns*) @@ -20,7 +20,7 @@ (= function* (table))) (enq clear initialization-fns*) -; persisting and checking traces for each test +;; persisting and checking traces for each test (= traces* (queue)) (= trace-dir* ".traces/") (ensure-dir trace-dir*) @@ -76,7 +76,7 @@ (each (name . body) fns (= function*.name (convert-braces body)))) -; running mu +;; running mu (def v (operand) ; for value operand.0) @@ -443,7 +443,7 @@ (each elem types*.type!elems (yield sizeof.elem)))))) -; desugar structured assembly based on blocks +;; desugar structured assembly based on blocks (def convert-braces (instrs) (let locs () ; list of information on each brace: (open/close pc) @@ -534,7 +534,7 @@ (pr msg) (apply prn args)) -; after loading all files, start at 'main' +;; after loading all files, start at 'main' (reset) (awhen cdr.argv (map add-fns:readfile it) |