extract tests out of src
This commit is contained in:
parent
aad52241c8
commit
36635660b4
35 changed files with 10 additions and 3 deletions
33
test/max.ssa
Normal file
33
test/max.ssa
Normal file
|
@ -0,0 +1,33 @@
|
|||
# find the maximum value
|
||||
# in a nul-terminated array
|
||||
# of unsigned bytes
|
||||
#
|
||||
# the output is stored in $a
|
||||
|
||||
data $arr = { b 10, b -60, b 10, b 100, b 200, b 0 }
|
||||
|
||||
function $test() {
|
||||
@start
|
||||
@loop
|
||||
%max =w phi @start -1, @new %byt, @old %max
|
||||
%loc =l phi @start $arr, @new %loc1, @old %loc1
|
||||
%byt =w loadub %loc
|
||||
%loc1 =l add 1, %loc
|
||||
jnz %byt, @iter, @end
|
||||
@iter
|
||||
%cmp =w cslew %max, %byt
|
||||
jnz %cmp, @new, @old
|
||||
@new
|
||||
jmp @loop
|
||||
@old
|
||||
jmp @loop
|
||||
@end
|
||||
storew %max, $a
|
||||
ret
|
||||
}
|
||||
|
||||
# >>> driver
|
||||
# extern void test(void);
|
||||
# int a;
|
||||
# int main() { test(); return !(a == 200); }
|
||||
# <<<
|
Loading…
Add table
Add a link
Reference in a new issue