diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2014-10-12 10:31:57 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2014-10-12 10:32:03 -0700 |
| commit | aa7de0e8afb518cc4d42561945b3a6ece87a45f2 (patch) | |
| tree | 09f6c3b96e57c7adcf1b80b321e658c6728a0ed8 | |
| parent | 6d24d47bd755b4a320ca8d7a84698b500024dc97 (diff) | |
| download | mu-aa7de0e8afb518cc4d42561945b3a6ece87a45f2.tar.gz | |
136 - log memory in consistent order
This is super slow. Maybe I should keep it commented out until we need it? Open to doing that in future.
| -rw-r--r-- | mu.arc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mu.arc b/mu.arc index fe64105a..57e86835 100644 --- a/mu.arc +++ b/mu.arc @@ -243,7 +243,7 @@ (pop-stack context) (if empty.context (return ninstrs)) (++ pc.context)) - (trace "run" "-- " memory*) + (trace "run" "-- " (sort (compare < string:car) (as cons memory*))) (trace "run" top.context!fn-name " " pc.context ": " (body.context pc.context)) ;? (prn "--- " top.context!fn-name " " pc.context ": " (body.context pc.context)) (let (oarg op arg) (parse-instr (body.context pc.context)) |