From 207c6ef945a56e3928b5369a691b2107dfdf847b Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Wed, 1 Sep 2021 13:22:16 -0700 Subject: . --- html/shell/infix.mu.html | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'html/shell/infix.mu.html') diff --git a/html/shell/infix.mu.html b/html/shell/infix.mu.html index 2f4207c2..0054d59a 100644 --- a/html/shell/infix.mu.html +++ b/html/shell/infix.mu.html @@ -80,7 +80,7 @@ if ('onhashchange' in window) { 14 fn transform-infix-2 _x-ah: (addr handle cell), trace: (addr trace), at-head-of-list?: boolean { 15 var x-ah/edi: (addr handle cell) <- copy _x-ah 16 var x/eax: (addr cell) <- lookup *x-ah - 17 +-- 14 lines: # trace x-ah -------------------------------------------------------------------------------------------------------------------------------------------------------------- + 17 +-- 14 lines: # trace x-ah ------------------------------------------------------------------------------------------------------------------------------------------------------------ 31 trace-lower trace 32 #? { 33 #? var foo/eax: int <- copy x @@ -118,7 +118,7 @@ if ('onhashchange' in window) { 65 compare *x-type, 0/pair 66 break-if-= 67 trace-higher trace - 68 +-- 15 lines: # trace "=> " x-ah -------------------------------------------------------------------------------------------------------------------------------------------------------- + 68 +-- 15 lines: # trace "=> " x-ah ------------------------------------------------------------------------------------------------------------------------------------------------------ 83 #? draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, "^", 4/fg 0/bg 84 return 85 } @@ -139,7 +139,7 @@ if ('onhashchange' in window) { 100 break-if-= 101 copy-object first-ah, x-ah 102 trace-higher trace -103 +-- 15 lines: # trace "=> " x-ah -------------------------------------------------------------------------------------------------------------------------------------------------------- +103 +-- 15 lines: # trace "=> " x-ah ------------------------------------------------------------------------------------------------------------------------------------------------------ 118 return 119 } 120 #? draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, "c", 4/fg 0/bg @@ -278,7 +278,7 @@ if ('onhashchange' in window) { 253 transform-infix-2 right-ah, trace, right-at-head-of-list? 254 #? draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, "z", 1/fg 0/bg 255 trace-higher trace -256 +-- 15 lines: # trace "=> " x-ah -------------------------------------------------------------------------------------------------------------------------------------------------------- +256 +-- 15 lines: # trace "=> " x-ah ------------------------------------------------------------------------------------------------------------------------------------------------------ 271 } 272 273 fn not-null-not-nil-pair? _x: (addr cell) -> _/eax: boolean { -- cgit 1.4.1-2-gfad0