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