diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2015-01-02 15:19:59 -0800 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2015-01-02 15:19:59 -0800 |
| commit | 4ccca667454d268c66b34d0d2b13ec8f2b36c293 (patch) | |
| tree | c5aa437f06d50fc4aec50ae962c26d16e70ce7ec | |
| parent | 047fe3f0adcbd8f1f4a8ee5aab6facc433bfae57 (diff) | |
| download | mu-4ccca667454d268c66b34d0d2b13ec8f2b36c293.tar.gz | |
490
| -rw-r--r-- | mu.arc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mu.arc b/mu.arc index d7ca1afe..55593947 100644 --- a/mu.arc +++ b/mu.arc @@ -464,14 +464,14 @@ (continue)) jump-if (let flag (m arg.0) - (trace "jump" "checking that " flag " is t") + (trace "jump" "checking " flag) (when (is t flag) (= pc.routine* (+ 1 pc.routine* (v arg.1))) (trace "jump" "jumping to " pc.routine*) (continue))) jump-unless ; convenient helper (let flag (m arg.0) - (trace "jump" "checking " flag) + (trace "jump" "checking ~" flag) (when (no flag) (= pc.routine* (+ 1 pc.routine* (v arg.1))) (trace "jump" "jumping to " pc.routine*) |