From 3dda906d2457a6ff577d6fa34274f43529a87dbe Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Fri, 4 Dec 2020 23:57:35 -0800 Subject: 7335 --- html/apps/tile/rpn.mu.html | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'html/apps/tile/rpn.mu.html') diff --git a/html/apps/tile/rpn.mu.html b/html/apps/tile/rpn.mu.html index afb4d47f..60f7625e 100644 --- a/html/apps/tile/rpn.mu.html +++ b/html/apps/tile/rpn.mu.html @@ -699,10 +699,10 @@ if ('onhashchange' in window) { 639 var callee-h: (handle function) 640 var callee-ah/eax: (addr handle function) <- address callee-h 641 find-function functions, curr-stream, callee-ah -642 var callee/eax: (addr function) <- lookup *callee-ah -643 compare callee, 0 +642 var callee/eax: (addr function) <- lookup *callee-ah +643 compare callee, 0 644 break-if-= -645 perform-call callee, out, functions +645 perform-call callee, out, functions 646 break $evaluate:process-word 647 } 648 ### if it's a name, push its value @@ -853,14 +853,14 @@ if ('onhashchange' in window) { 793 } 794 795 fn perform-call _callee: (addr function), caller-stack: (addr value-stack), functions: (addr handle function) { -796 var callee/ecx: (addr function) <- copy _callee +796 var callee/ecx: (addr function) <- copy _callee 797 # create bindings for args 798 var table-storage: table 799 var table/esi: (addr table) <- address table-storage 800 initialize-table table, 0x10 -801 bind-args callee, caller-stack, table +801 bind-args callee, caller-stack, table 802 # obtain body -803 var body-ah/eax: (addr handle line) <- get callee, body +803 var body-ah/eax: (addr handle line) <- get callee, body 804 var body/eax: (addr line) <- lookup *body-ah 805 # perform call 806 var stack-storage: value-stack @@ -886,8 +886,8 @@ if ('onhashchange' in window) { 826 # pop args from the caller-stack and bind them to successive args 827 # implies: function args are stored in reverse order 828 fn bind-args _callee: (addr function), _caller-stack: (addr value-stack), table: (addr table) { -829 var callee/ecx: (addr function) <- copy _callee -830 var curr-arg-ah/eax: (addr handle word) <- get callee, args +829 var callee/ecx: (addr function) <- copy _callee +830 var curr-arg-ah/eax: (addr handle word) <- get callee, args 831 var curr-arg/eax: (addr word) <- lookup *curr-arg-ah 832 # 833 var curr-key-storage: (handle array byte) -- cgit 1.4.1-2-gfad0