wu-arch/vortex
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Bubble sort test program.

Browse Source
This commit is contained in:
chad
2013-10-02 01:53:32 -04:00
parent 95854c4073
commit 629d3d47b9
1 changed files with 10 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
src/test/bubble.s
View File

@@ -7,26 +7,29 @@
.global .global
entry: ldi %r1, Array; /* p = array; */ entry: ldi %r1, Array; /* p = array; */
ldi %r6, ArrayEnd; /* lim = array+N */
oloop: /* do { */ oloop: /* do { */
ori %r2, %r1, #0; /* q = p; */ ldi %r2, Array; /* q = array; */
iloop: iloop:
subi %r3, %r2, ArrayEnd; /* while (q != array+N) { */ sub %r3, %r2, %r6; /* while (q != lim) { */
iszero @p0, %r3; iszero @p0, %r3;
@p0 ? jmpi onext; @p0 ? jmpi onext;
ld %r3, %r2, #0; /* if (*q > *(q + 1)) { */ ld %r3, %r2, #0; /* if (*q > *(q + 1)) { */
ld %r4, %r2, __WORD; /* temp = *(q + 1); */ ld %r4, %r2, __WORD; /* temp = *(q + 1); */
sub %r5, %r3, %r4; sub %r5, %r4, %r3;
isneg @p0, %r5; isneg @p0, %r5;
notp @p0, @p0; notp @p0, @p0;
@p0 ? jmpi inext; @p0 ? jmpi inext;
st %r3, %r2, __WORD; /* *(q + 1) = *q; */ st %r3, %r2, __WORD; /* *(q + 1) = *q; */
st %r3, %r2, #0; /* *q = temp; */ st %r4, %r2, #0; /* *q = temp; */
/* } */ /* } */
inext: addi %r2, %r2, #1; /* q++; */ inext: addi %r2, %r2, __WORD; /* q++; */
jmpi iloop; /* } */ jmpi iloop; /* } */
onext: addi %r1, %r1, #1; /* p++; */ onext: addi %r1, %r1, __WORD; /* p++; */
subi %r3, %r1, ArrayEnd; /* } while (p != p + SIZE); */ subi %r6, %r6, __WORD; /* lim--; */
subi %r3, %r1, ArrayEnd; /* } while (p != array+N) */
rtop @p0, %r3; rtop @p0, %r3;
@p0 ? jmpi oloop; @p0 ? jmpi oloop;