char chars[] = "AaBbCcDd";                                                     /* "chars is an array of bytes with zero byte" */

string str = .;                                                                /* "str and str' are empty string and pointer to it" */
p_string str' = &str;

ÚÄ f(str') Ä
³
³ str'->pointer = &chars[position, {                                           /* "string is now slice over existing byte array"    */
³                                    position, rc = find (chars, "Bb")
³                                  }]; 
³
³ str'->length = length (str'->pointer);                                       /* "string length is the size of the slice in bytes" */
³
ÀÄÄÄÄÄÄÄÄÄÄÄ

stdio:print ("%s" "\n", str);                                                  /* "BbCcDd" */