代码搜索结果

/ qsort interfact to c / qsort(from, to) .globl _qsort _qsort: mov 2(sp),r1 mov 4(sp),r2 jsr pc,qsort rts pc qsort: mov r2,r3 sub r1,r3 cmp r3,$4 ble done asr r3 bic $3,r3 add r1,r3 mo

. .. r0 r1 r2 r3 r4 r5 sp pc csw mov movb cmp cmpb bit bitb bic bicb bis bisb add sub br bne beq bge blt bgt ble bpl bmi bhi blos bvc bvs bhis bec bcc blo bcs bes jbr jne jeq jge jlt jgt jle jpl jmi j

/ / /roff3 -- runoff skipcont: jsr pc,getchar mov r0,r2 jsr pc,alph2 beq skipcont 1: cmp $' ,r0 bne 1f jsr pc,getchar br 1b 1: mov r0,ch rts pc rbreak: tst nc ble 4f clrb *linep inc t

/ / / rf -- real comparisons .globl rlt4 .globl rle4 .globl req4 .globl rne4 .globl rge4 .globl rgt4 rlt4: jsr pc,compar blt one br zero rle4: jsr pc,compar ble one br zero req4: jsr pc,co

/ / / re -- comparison of 8-byte quantities .globl rle8 .globl rlt8 .globl req8 .globl rne8 .globl rge8 .globl rgt8 rlt8: jsr pc,compar blt one br zero rle8: jsr pc,compar ble one br zero re

/ kill process mov (sp)+,r4 tst (sp)+ loop: dec r4 ble done mov (sp)+,r5 clr r3 cmpb (r5),$'- bne 1f inc r5 clr signo 1: movb (r5)+,r0 beq 1f sub $'0,r0 cmp r0,$9 bhi error mul $10.,

/ ar -- archive/library mov (sp)+,r0 sub $2,r0 ble userr tst (sp)+ mov (sp)+,r1 clr r2 1: tstb (r1) beq 1f cmpb (r1),$'v bne 2f inc r1 incb vflg br 1b 2: tst r2 bne userr movb (r1)+,r

/ / ed: mov (sp)+,r3 ble error econ: sys stat; ftemp; buffer bec 2f sys creat; ftemp; 666 mov r0,tmpw sys open; ftemp; 0 mov r0,tmpr br 1f 2: cmpb $'z,ftemp+9. bne 2f mov $1,r0 sys write;

/ cat -- concatinate files mov (sp)+,r5 tst (sp)+ mov $obuf,r2 cmp r5,$1 beq 3f loop: dec r5 ble done mov (sp)+,r0 cmpb (r0),$'- bne 2f clr fin br 3f 2: mov r0,0f sys open; 0:..; 0 be

/ rmdir -- unlink directory mov (sp)+,r5 tst (sp)+ loop: dec r5 ble done mov (sp)+,r1 mov $name,r2 clr r0 1: inc r0 movb (r1)+,(r2)+ bne 1b dec r2 dec r0 mov r0,size cmp r2,$name beq