blob: 90f224c2dbaee700ca6664dc584fa713ba80fa0a (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
# Some helpers needed only because Mu doesn't support globals at the moment.
== code
count-test-failure:
# . prologue
55/push-ebp
89/<- %ebp 4/r32/esp
#
ff 0/subop/increment *Num-test-failures
$count-test-failure:end:
# . epilogue
89/<- %esp 5/r32/ebp
5d/pop-to-ebp
c3/return
num-test-failures: # -> _/eax: int
# . prologue
55/push-ebp
89/<- %ebp 4/r32/esp
#
8b/-> *Num-test-failures 0/r32/eax
$num-test-failures:end:
# . epilogue
89/<- %esp 5/r32/ebp
5d/pop-to-ebp
c3/return
running-tests?: # -> _/eax: int
# . prologue
55/push-ebp
89/<- %ebp 4/r32/esp
#
8b/-> *Running-tests? 0/r32/eax
$running-tests?:end:
# . epilogue
89/<- %esp 5/r32/ebp
5d/pop-to-ebp
c3/return
== data
Num-test-failures:
0/imm32
Running-tests?:
1/imm32/true
|