From 6842dddd681e85afd8373e66227f110ea963671d Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Thu, 22 Apr 2021 07:56:49 -0700 Subject: . --- shell/print.mu | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) (limited to 'shell') diff --git a/shell/print.mu b/shell/print.mu index 7d6b8eb3..1eb19ba3 100644 --- a/shell/print.mu +++ b/shell/print.mu @@ -82,8 +82,8 @@ fn print-cell _in: (addr handle cell), out: (addr stream byte), trace: (addr tra } # debug helper -fn dump-cell in-ah: (addr handle cell) { - var stream-storage: (stream byte 0x40) +fn dump-cell-at-top-right in-ah: (addr handle cell) { + var stream-storage: (stream byte 0x200) var stream/edx: (addr stream byte) <- address stream-storage print-cell in-ah, stream, 0/no-trace var d1/eax: int <- copy 0 @@ -91,6 +91,13 @@ fn dump-cell in-ah: (addr handle cell) { d1, d2 <- draw-stream-wrapping-right-then-down 0/screen, stream, 0/xmin, 0/ymin, 0x80/xmax, 0x30/ymax, 0/x, 0/y, 7/fg, 0/bg } +fn dump-cell-from-cursor-over-full-screen in-ah: (addr handle cell) { + var stream-storage: (stream byte 0x200) + var stream/edx: (addr stream byte) <- address stream-storage + print-cell in-ah, stream, 0/no-trace + draw-stream-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, stream, 7/fg, 0/bg +} + fn print-symbol _in: (addr cell), out: (addr stream byte), trace: (addr trace) { trace-text trace, "print", "symbol" var in/esi: (addr cell) <- copy _in -- cgit 1.4.1-2-gfad0