From cfdee0a6fac625774d435ccc03dcfa8c527d0f45 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sat, 4 Sep 2021 13:57:20 -0700 Subject: fix apps/ex7.mu I'm increasingly missing CI. --- 501draw-text.mu | 7 +++++++ 1 file changed, 7 insertions(+) (limited to '501draw-text.mu') diff --git a/501draw-text.mu b/501draw-text.mu index 5d2917a9..61023642 100644 --- a/501draw-text.mu +++ b/501draw-text.mu @@ -81,6 +81,13 @@ fn move-cursor-to-left-margin-of-next-line screen: (addr screen) { set-cursor-position screen, cursor-x, cursor-y } +fn draw-code-point-at-cursor screen: (addr screen), c: code-point, color: int, background-color: int { + var cursor-x/eax: int <- copy 0 + var cursor-y/ecx: int <- copy 0 + cursor-x, cursor-y <- cursor-position screen + var dummy/eax: int <- draw-code-point screen, c, cursor-x, cursor-y, color, background-color +} + fn draw-code-point-at-cursor-over-full-screen screen: (addr screen), c: code-point, color: int, background-color: int { var cursor-x/eax: int <- copy 0 var cursor-y/ecx: int <- copy 0 -- cgit 1.4.1-2-gfad0