diff options
author | Kartik Agaram <vc@akkartik.com> | 2020-10-26 21:54:31 -0700 |
---|---|---|
committer | Kartik Agaram <vc@akkartik.com> | 2020-10-26 21:54:31 -0700 |
commit | 2ddfdf191c8c1f8be1bab5f5aad76b610922b444 (patch) | |
tree | 6130c48068adee4e0f8ed132bfba2b75de2234e7 /apps/tile | |
parent | 8bbd494aaa75c2a9c527a2e701ce4e8a651b6b02 (diff) | |
download | mu-2ddfdf191c8c1f8be1bab5f5aad76b610922b444.tar.gz |
7118
Diffstat (limited to 'apps/tile')
-rw-r--r-- | apps/tile/environment.mu | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/apps/tile/environment.mu b/apps/tile/environment.mu index 5661ce54..cb36a4ca 100644 --- a/apps/tile/environment.mu +++ b/apps/tile/environment.mu @@ -1552,15 +1552,17 @@ fn clear-canvas _env: (addr environment) { print-string screen, "primitives:" start-col <- add 2 move-cursor screen, 2, start-col - print-string screen, "+ - * len open read" + print-string screen, "+ - * len" move-cursor screen, 3, start-col + print-string screen, "open read" + move-cursor screen, 4, start-col print-string screen, "dup swap" # currently defined functions start-col <- subtract 2 - move-cursor screen, 5, start-col + move-cursor screen, 6, start-col print-string screen, "functions:" start-col <- add 2 - var row/ebx: int <- copy 6 + var row/ebx: int <- copy 7 var functions/esi: (addr handle function) <- get env, functions { var curr/eax: (addr function) <- lookup *functions |