akkartik
/
mu
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

7751

This commit is contained in:
Kartik K. Agaram 2021-02-15 13:17:50 -08:00
parent f365875fa4
commit d83dce3b98
1 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
baremetal/shell/line.mu
View File

@ -133,6 +133,7 @@ fn render-word-with-stack-and-cursor screen: (addr screen), line: (addr line), c
render-cursor? <- copy 1/true
}
var new-x/eax: int <- render-word screen, curr-word, x, y, render-cursor?
add-to x, 1/word-stack-indent
var new-x-saved/edx: int <- copy new-x
add-to y, 2/word-stack-spacing
# compute stack until word
@ -166,9 +167,10 @@ fn test-render-line-with-stack-singleton {
var new-x/eax: int <- copy 0
var new-y/ecx: int <- copy 0
new-x, new-y <- render-line-with-stack screen, line, 0/x, 0/y, 0/no-cursor
check-screen-row screen, 0/y, "1 ", "F - test-render-line-with-stack-singleton/0"
check-screen-row screen, 1/y, " ", "F - test-render-line-with-stack-singleton/1"
check-screen-row screen, 2/y, " 1 ", "F - test-render-line-with-stack-singleton/2"
check-screen-row screen, 0/y, "1 ", "F - test-render-line-with-stack-singleton/0"
check-screen-row screen, 1/y, " ", "F - test-render-line-with-stack-singleton/1"
# ___
check-screen-row screen, 2/y, " 1 ", "F - test-render-line-with-stack-singleton/2"
# not bothering to test hash colors for numbers
}
@ -185,11 +187,11 @@ fn test-render-line-with-stack {
var new-x/eax: int <- copy 0
var new-y/ecx: int <- copy 0
new-x, new-y <- render-line-with-stack screen, line, 0/x, 0/y, 0/no-cursor
check-screen-row screen, 0/y, "1 2 ", "F - test-render-line-with-stack/0"
check-screen-row screen, 1/y, " ", "F - test-render-line-with-stack/1"
#___ ___
check-screen-row screen, 2/y, " 1 2 ", "F - test-render-line-with-stack/2"
check-screen-row screen, 3/y, " 1 ", "F - test-render-line-with-stack/3"
check-screen-row screen, 0/y, "1 2 ", "F - test-render-line-with-stack/0"
check-screen-row screen, 1/y, " ", "F - test-render-line-with-stack/1"
# ___ ___
check-screen-row screen, 2/y, " 1 2 ", "F - test-render-line-with-stack/2"
check-screen-row screen, 3/y, " 1 ", "F - test-render-line-with-stack/3"
# not bothering to test hash colors for numbers
}