]> git.lizzy.rs Git - plan9front.git/blob - sys/src/libc/68000/memchr.s
marshal(1): fix example: upas/mail -> mail (thanks fulton)
[plan9front.git] / sys / src / libc / 68000 / memchr.s
1         TEXT    memchr(SB),$0
2         MOVL    n+8(FP),R0
3         BEQ     ret
4         MOVL    s1+0(FP),A1
5         MOVL    c+4(FP),R1
6
7 l1:     CMPB    R1,(A1)+
8         BEQ     eq
9         SUBL    $1,R0
10         BNE     l1
11         RTS
12
13 eq:     MOVL    A1,R0
14         SUBL    $1,R0
15 ret:    RTS