Sorting algorithms/Cycle sort: Difference between revisions
m
→{{header|360 Assembly}}: Superfluous blanks suppressed
PatGarrett (talk | contribs) (→{{header|360 Assembly}}: Section added) |
PatGarrett (talk | contribs) m (→{{header|360 Assembly}}: Superfluous blanks suppressed) |
||
Line 20:
{{trans|NetRexx}}
The program uses ASM structured macros and two ASSIST macros to keep the code as short as possible.
<lang 360asm>* Cycle sort 26/06/2016
CYCLESRT CSECT
USING CYCLESRT,R13 base register
Line 131 ⟶ 130:
RT EQU 9 temp
RM EQU 10 item
END CYCLESRT</lang>
{{out}}
<pre>
-31 0 1 2 2 4 45 58 65 69 74 82 82 83 88 89 99 104 112 782
</pre>
=={{header|C}}==
|