diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-11-03 22:38:28 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-11-03 22:38:28 -0800 |
commit | 39cc7eb6587cac5fb0c071b1136502eef90acb0d (patch) | |
tree | 60c03b8428df2043b4f382e0e2e5aa693cf8ad84 | |
parent | 83d275f9a8c5e37bdff7f0b7c2f92c9d04fa061d (diff) | |
download | mu-39cc7eb6587cac5fb0c071b1136502eef90acb0d.tar.gz |
216
-rw-r--r-- | mu.arc | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/mu.arc b/mu.arc index 1db0ef09..fa70fdf2 100644 --- a/mu.arc +++ b/mu.arc @@ -682,11 +682,11 @@ instrs)) (def maybe-add (arg offset idx) - (unless (or (in ty.arg 'literal 'offset 'fn) - (offset v.arg) - (~isa v.arg 'sym) - (in v.arg 'nil 'default-scope) - (pos 'global metadata.arg)) + (when (and (~in ty.arg 'literal 'offset 'fn) + (~offset v.arg) + (isa v.arg 'sym) + (~in v.arg 'nil 'default-scope) + (~pos 'global metadata.arg)) (= (offset v.arg) idx))) ;; literate tangling system for reordering code |