#line 1986 "utilities/type.bas"
qbs*oldstr4489=NULL;
#line 1986 "utilities/type.bas"
if(_SUB_COPY_FULL_UDT_STRING_DST->tmp||_SUB_COPY_FULL_UDT_STRING_DST->fixed||_SUB_COPY_FULL_UDT_STRING_DST->readonly){
#line 1986 "utilities/type.bas"
oldstr4489=_SUB_COPY_FULL_UDT_STRING_DST;
#line 1986 "utilities/type.bas"
if (oldstr4489->cmem_descriptor){
#line 1986 "utilities/type.bas"
_SUB_COPY_FULL_UDT_STRING_DST=qbs_new_cmem(oldstr4489->len,0);
#line 1986 "utilities/type.bas"
}else{
#line 1986 "utilities/type.bas"
_SUB_COPY_FULL_UDT_STRING_DST=qbs_new(oldstr4489->len,0);
#line 1986 "utilities/type.bas"
}
#line 1986 "utilities/type.bas"
memcpy(_SUB_COPY_FULL_UDT_STRING_DST->chr,oldstr4489->chr,oldstr4489->len);
#line 1986 "utilities/type.bas"
}
#line 1986 "utilities/type.bas"
qbs*oldstr4490=NULL;
#line 1986 "utilities/type.bas"
if(_SUB_COPY_FULL_UDT_STRING_SRC->tmp||_SUB_COPY_FULL_UDT_STRING_SRC->fixed||_SUB_COPY_FULL_UDT_STRING_SRC->readonly){
#line 1986 "utilities/type.bas"
oldstr4490=_SUB_COPY_FULL_UDT_STRING_SRC;
#line 1986 "utilities/type.bas"
if (oldstr4490->cmem_descriptor){
#line 1986 "utilities/type.bas"
_SUB_COPY_FULL_UDT_STRING_SRC=qbs_new_cmem(oldstr4490->len,0);
#line 1986 "utilities/type.bas"
}else{
#line 1986 "utilities/type.bas"
_SUB_COPY_FULL_UDT_STRING_SRC=qbs_new(oldstr4490->len,0);
#line 1986 "utilities/type.bas"
}
#line 1986 "utilities/type.bas"
memcpy(_SUB_COPY_FULL_UDT_STRING_SRC->chr,oldstr4490->chr,oldstr4490->len);
#line 1986 "utilities/type.bas"
}
#line 1987 "utilities/type.bas"
int32 pass4491;
