about summary refs log tree commit diff stats
path: root/apps/tile
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-12-06 22:00:37 -0800
committerKartik Agaram <vc@akkartik.com>2020-12-06 22:06:44 -0800
commit601785364f45a7bd9846ac7ddd51df80784e7421 (patch)
tree94658e4494abb001230d53e42e2214942a49aed4 /apps/tile
parent642c7c8cab9dc4efe056a7774b42832646a43ba3 (diff)
downloadmu-601785364f45a7bd9846ac7ddd51df80784e7421.tar.gz
7343
Diffstat (limited to 'apps/tile')
-rw-r--r--apps/tile/environment.mu9
1 files changed, 4 insertions, 5 deletions
diff --git a/apps/tile/environment.mu b/apps/tile/environment.mu
index 1795b32b..2015e4cf 100644
--- a/apps/tile/environment.mu
+++ b/apps/tile/environment.mu
@@ -1904,16 +1904,15 @@ fn clear-canvas _env: (addr environment) {
   var screen/edi: (addr screen) <- copy _screen
   clear-screen screen
   var nrows/eax: (addr int) <- get env, nrows
-  var _sep-col/ecx: (addr int) <- get env, code-separator-col
-  var sep-col/ecx: int <- copy *_sep-col
-  draw-vertical-line screen, 1, *nrows, sep-col
+  var sep-col/ecx: (addr int) <- get env, code-separator-col
+  draw-vertical-line screen, 1, *nrows, *sep-col
   # wordstar-style cheatsheet of shortcuts
   move-cursor screen, *nrows, 0
   start-reverse-video screen
   print-string screen, " ctrl-q "
   reset-formatting screen
   print-string screen, " quit "
-  var menu-start/ebx: int <- copy sep-col
+  var menu-start/ebx: int <- copy *sep-col
   menu-start <- subtract 0x48  # 72 = half the size of the menu
   move-cursor screen, *nrows, menu-start
   start-reverse-video screen
@@ -1953,7 +1952,7 @@ fn clear-canvas _env: (addr environment) {
   reset-formatting screen
   print-string screen, " define function  "
   # primitives
-  var dummy/eax: int <- render-primitives screen, *nrows, sep-col
+  var dummy/eax: int <- render-primitives screen, *nrows, *sep-col
 }
 
 # return value: top-most row written to