about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-10-10 21:43:34 -0700
committerKartik Agaram <vc@akkartik.com>2020-10-10 21:43:34 -0700
commit3d203a4484ec1603a7e39b0c533daef0827ebf58 (patch)
tree52912a98cee0c730aea4854bdb9b6784dbfe1cba
parent7c2d5dc88b48630026eb266a6cb81c95a8a9d798 (diff)
downloadmu-3d203a4484ec1603a7e39b0c533daef0827ebf58.tar.gz
6996
-rw-r--r--apps/tile/environment.mu15
1 files changed, 1 insertions, 14 deletions
diff --git a/apps/tile/environment.mu b/apps/tile/environment.mu
index 114b8414..7e2b360b 100644
--- a/apps/tile/environment.mu
+++ b/apps/tile/environment.mu
@@ -140,21 +140,8 @@ $process:body: {
           var _cursor-word/eax: (addr word) <- lookup *cursor-word-ah
           cursor-word <- copy _cursor-word
         }
-        # then move to end of caller's previous word
-        {
-          var prev-word-ah/edx: (addr handle word) <- get cursor-word, prev
-          var prev-word/eax: (addr word) <- lookup *prev-word-ah
-          compare prev-word, 0
-          break-if-=
-#?           print-string 0, "jump before caller\n"
-          copy-object prev-word-ah, cursor-word-ah
-          cursor-to-end prev-word
-          var cursor-call-path/eax: (addr handle call-path-element) <- get sandbox, cursor-call-path
-          decrement-final-element cursor-call-path
-        }
-        break $process:body
       }
-      # otherwise, move to end of previous word
+      # then move to end of previous word
       var prev-word-ah/edx: (addr handle word) <- get cursor-word, prev
       var prev-word/eax: (addr word) <- lookup *prev-word-ah
       {