diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2021-06-20 20:36:47 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2021-06-20 20:36:47 -0700 |
commit | 9d7d99fe6cc5a05960ef52cdfa8acefabf8e40bf (patch) | |
tree | bc1829c1f4c5e3256dfabc552664fbd5e3e9840e /mu-init.subx | |
parent | 29795a0db4e1d180217123f81f14b69189b3c12c (diff) | |
download | mu-9d7d99fe6cc5a05960ef52cdfa8acefabf8e40bf.tar.gz |
snapshot
This is going better than expected; just 3 failing tests among the new ones.
Diffstat (limited to 'mu-init.subx')
-rw-r--r-- | mu-init.subx | 33 |
1 files changed, 17 insertions, 16 deletions
diff --git a/mu-init.subx b/mu-init.subx index 4bd7abc6..25c1149e 100644 --- a/mu-init.subx +++ b/mu-init.subx @@ -14,22 +14,23 @@ Entry: bd/copy-to-ebp 0/imm32 # #? (main 0 0 Primary-bus-secondary-drive) -#? (test-tokenize-indent) -#? (test-run-integer) -#? (test-run-expand-trace) - # always first run tests - (run-tests) - (num-test-failures) # => eax - # call main if tests all passed - { - 3d/compare-eax-and 0/imm32 - 75/jump-if-!= break/disp8 - c7 0/subop/copy *Running-tests? 0/imm32/false - (clear-real-screen) - c7 0/subop/copy *Real-screen-cursor-x 0/imm32 - c7 0/subop/copy *Real-screen-cursor-y 0/imm32 - (main 0 0 Primary-bus-secondary-drive) - } +#? (set-cursor-position 0 0x40 0x20) + (test-parenthesize) + (test-parenthesize-skips-lines-with-initial-parens) + (test-parenthesize-skips-single-word-lines) +#? # always first run tests +#? (run-tests) +#? (num-test-failures) # => eax +#? # call main if tests all passed +#? { +#? 3d/compare-eax-and 0/imm32 +#? 75/jump-if-!= break/disp8 +#? c7 0/subop/copy *Running-tests? 0/imm32/false +#? (clear-real-screen) +#? c7 0/subop/copy *Real-screen-cursor-x 0/imm32 +#? c7 0/subop/copy *Real-screen-cursor-y 0/imm32 +#? (main 0 0 Primary-bus-secondary-drive) +#? } # hang indefinitely { |