1/* strlen.s 4.3 84/11/07 */ 2 3/* 4 * Return the length of cp (not counting '\0'). 5 * 6 * strlen(cp) 7 * char *cp; 8 */ 9#include "DEFS.h" 10 11ENTRY(strlen, 0) 12 movl 4(ap),r1 131: 14 locc $0,$65535,(r1) # look for '\0' 15 beql 1b 16 subl3 4(ap),r1,r0 # len = cp - base 17 ret 18