代码搜索结果
找到约 242 项符合
BLE 的代码
memset.s
TEXT memset(SB), $0
MOVL n+8(FP), R0
BLE return
MOVL s1+0(FP), A1
CLRL R1
MOVB c+7(FP), R1
BEQ l1
/*
* create 4 replicated copies
* of the byte in R1
*/
MOVL R1, R2
ASLL $8, R2
ORL R2, R
memset.s
TEXT memset(SB), $0
MOVL n+8(FP), R0
BLE return
MOVL s1+0(FP), A1
CLRL R1
MOVB c+7(FP), R1
BEQ l1
/*
* create 4 replicated copies
* of the byte in R1
*/
MOVL R1, R2
ASLL $8, R2
ORL R2, R
vlop.s
TEXT _mulv(SB), $0
MOVW u1+8(FP), R8
MOVW u2+16(FP), R13
MOVW R13, R16 /* save low parts for later */
MOVW R8, R12
/*
* unsigned 32x32 => 64 multiply
*/
CMP R13, R8
BLE mul1
MOVW R12, R
memset.s
TEXT memset(SB), $0
MOVL n+8(FP), R0
BLE return
MOVL s1+0(FP), A1
CLRL R1
MOVB c+7(FP), R1
BEQ l1
/*
* create 4 replicated copies
* of the byte in R1
*/
MOVL R1, R2
ASLL $8, R2
ORL R2, R
cat.s
/ 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
cat.s
/ 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
kill.s
/ 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.s
/ 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
rmdir.s
/ 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
qsort.s
/ 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