]> git.lizzy.rs Git - plan9front.git/blob - sys/src/libc/68020/strcat.s
vt: but not too fast :-)
[plan9front.git] / sys / src / libc / 68020 / strcat.s
1         TEXT    strcat(SB), $0
2         MOVL    s1+0(FP), A2
3         MOVL    s2+4(FP), A1
4
5 l1:     TSTB    (A2)+
6         BNE     l1
7
8         MOVB    (A1)+, -1(A2)
9         BEQ     done
10
11 l2:     MOVB    (A1)+, (A2)+
12         BNE     l2
13
14 done:   MOVL    s1+0(FP), R0
15         RTS