diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2021-07-05 22:06:37 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2021-07-05 22:06:37 -0700 |
| commit | 468b0d979fe2e20f146d19934d22ccb566c04d9d (patch) | |
| tree | 11ecf447fe24251bb0fc2063c3092cfed54efdaa | |
| parent | 5d614af9553d19bf8c9f8b3344f14e681978c96b (diff) | |
| download | mu-468b0d979fe2e20f146d19934d22ccb566c04d9d.tar.gz | |
shell: fix clear on screens
Broken since commit c95648c96 on Jul 3. Unclear what test to write for this. Should clear-stream check for NULL? Should apply-clear?
| -rw-r--r-- | shell/primitives.mu | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/shell/primitives.mu b/shell/primitives.mu index 30c4864e..5f78c313 100644 --- a/shell/primitives.mu +++ b/shell/primitives.mu @@ -1646,7 +1646,7 @@ fn apply-clear _args-ah: (addr handle cell), out: (addr handle cell), trace: (ad var first-type/ecx: (addr int) <- get first, type compare *first-type, 3/stream { - break-if-= + break-if-!= var stream-data-ah/eax: (addr handle stream byte) <- get first, text-data var _stream-data/eax: (addr stream byte) <- lookup *stream-data-ah var stream-data/ebx: (addr stream byte) <- copy _stream-data |