if (retval_ptr) { pv.value.str.len = strlen(str)+sizeof("return ;")-1; pv.value.str.val = emalloc(pv.value.str.len+1); strcpy(pv.value.str.val, "return "); strcat(pv.value.str.val, str); strcat(pv.value.str.val, " ;"); } else { pv.value.str.len = strlen(str); pv.value.str.val = estrndup(str, pv.value.str.len); } pv.type = IS_STRING; %retval_ptr% is always a %*zval% %str% is copied to %pv% unmodified