diff options
Diffstat (limited to 'baremetal/502test.mu')
-rw-r--r-- | baremetal/502test.mu | 43 |
1 files changed, 0 insertions, 43 deletions
diff --git a/baremetal/502test.mu b/baremetal/502test.mu deleted file mode 100644 index 00d55d34..00000000 --- a/baremetal/502test.mu +++ /dev/null @@ -1,43 +0,0 @@ -# print msg to screen if a != b, otherwise print "." -fn check-ints-equal _a: int, b: int, msg: (addr array byte) { - var a/eax: int <- copy _a - compare a, b - { - break-if-!= - draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, ".", 3/fg/cyan, 0/bg - return - } - draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, msg, 3/fg/cyan, 0/bg - move-cursor-to-start-of-next-line 0/screen - count-test-failure -} - -fn test-check-ints-equal { - check-ints-equal 0, 0, "abc" -} - -fn check _a: boolean, msg: (addr array byte) { - var a/eax: int <- copy _a - compare a, 0/false - { - break-if-= - draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, ".", 3/fg/cyan, 0/bg - return - } - draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, msg, 3/fg/cyan, 0/bg - move-cursor-to-start-of-next-line 0/screen - count-test-failure -} - -fn check-not _a: boolean, msg: (addr array byte) { - var a/eax: int <- copy _a - compare a, 0/false - { - break-if-!= - draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, ".", 3/fg/cyan, 0/bg - return - } - draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0/screen, msg, 3/fg/cyan, 0/bg - move-cursor-to-start-of-next-line 0/screen - count-test-failure -} |