/*
* call-seq: string=(str)
*
* Changes the string being scanned to +str+ and resets the scanner.
* Returns +str+.
*/staticVALUEstrscan_set_string(VALUEself,VALUEstr){structstrscanner*p;Data_Get_Struct(self,structstrscanner,p);StringValue(str);p->str=rb_str_dup(str);rb_obj_freeze(p->str);p->curr=0;CLEAR_MATCH_STATUS(p);returnstr;}