zstrlen:zchar — ordinary primitive
FORTH
ZSTRLEN ( z* -- len )();p4:"zstrlen";
ZSTRLEN ( z* -- len )(
)
push length of z-string.
: ZSTRLEN ZCOUNT NIP ;
(see libc strlen(3)) / compare with ZMOVE / CMOVE