1 # Initialize the minimal runtime for Mu programs.
 2 #
 3 # See translate for how this file is used.
 4 #
 5 # Mu programs start at a function called 'main' with this signature:
 6 #   fn main screen: (addr screen), keyboard: (addr keyboard), data-disk: (addr disk)
 7 #
 8 # All tests must pass first (the "power-on unit test").
 9 
10 == code
11 
12 Entry:
13   # initialize stack
14   bd/copy-to-ebp 0/imm32
15   #
16 #?   (main 0 0 Primary-bus-secondary-drive)
17   # always first run tests
18   (run-tests)
19   (num-test-failures)  # => eax
20   # call main if tests all passed
21   {
22     3d/compare-eax-and 0/imm32
23     75/jump-if-!= break/disp8
24     (clear-real-screen)
25     c7 0/subop/copy *Real-screen-cursor-x 0/imm32
26     c7 0/subop/copy *Real-screen-cursor-y 0/imm32
27     (main 0 0 Primary-bus-secondary-drive)
28   }
29 
30   # hang indefinitely
31   {
32     eb/jump loop/disp8
33   }