diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2021-05-29 15:53:21 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2021-05-29 15:53:21 -0700 |
commit | 2ad0a98f94be313e578185acc619764bd7ea9f00 (patch) | |
tree | 3d53b85578bef3f0b9edf140cde0d734ae2fb1fb /shell | |
parent | 56c621b6f1202f9defbf69dadec6d0cc6dae056d (diff) | |
download | mu-2ad0a98f94be313e578185acc619764bd7ea9f00.tar.gz |
.
Diffstat (limited to 'shell')
-rw-r--r-- | shell/tokenize.mu | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/shell/tokenize.mu b/shell/tokenize.mu index e74e549d..bdd02c02 100644 --- a/shell/tokenize.mu +++ b/shell/tokenize.mu @@ -233,19 +233,19 @@ fn next-token in: (addr gap-buffer), _out-cell: (addr cell), trace: (addr trace) var out-ah/eax: (addr handle stream byte) <- get out-cell, text-data var _out/eax: (addr stream byte) <- lookup *out-ah var out/edi: (addr stream byte) <- copy _out + clear-stream out + var g/eax: grapheme <- peek-from-gap-buffer in +#? draw-grapheme-at-cursor 0/screen, g, 7/fg, 0/bg +#? move-cursor-rightward-and-downward 0/screen, 0, 0x80 + { + var stream-storage: (stream byte 0x40) + var stream/esi: (addr stream byte) <- address stream-storage + write stream, "next: " + var gval/eax: int <- copy g + write-int32-hex stream, gval + trace trace, "tokenize", stream + } $next-token:body: { - clear-stream out - var g/eax: grapheme <- peek-from-gap-buffer in -#? draw-grapheme-at-cursor 0/screen, g, 7/fg, 0/bg -#? move-cursor-rightward-and-downward 0/screen, 0, 0x80 - { - var stream-storage: (stream byte 0x40) - var stream/esi: (addr stream byte) <- address stream-storage - write stream, "next: " - var gval/eax: int <- copy g - write-int32-hex stream, gval - trace trace, "tokenize", stream - } # open square brackets begin streams { compare g, 0x5b/open-square-bracket |