450

2014-12-27 18:20:13 -08:00 · 2014-12-27 18:20:13 -08:00 · 1f32d0e9cc
parent 3e167e879c
commit 1f32d0e9cc
1 changed files with 1 additions and 8 deletions
--- a/mu.arc
+++ b/mu.arc
@ -682,14 +682,7 @@
    ty.loc.0))

 (def addr (operand)
-;?   (prn 211 " " operand)
-  (let loc absolutize.operand
-;?     (prn 212 " " loc)
-    (while (pos '(deref) metadata.loc)
-;?       (prn 213 " " loc)
-      (zap deref loc))
-;?     (prn 214 " " loc)
-    v.loc))
+  (v canonize.operand))

 (def addrs (n sz)
  (accum yield