1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
TEXT strlen(SB),$0 MOVL $0, AX MOVL $-1, CX CLD /* * look for end of string */ MOVL p+0(FP), DI REPN; SCASB MOVL DI, AX SUBL p+0(FP), AX SUBL $1, AX RET