209 |
{ |
{ |
210 |
put_string (mach, str, p - str); |
put_string (mach, str, p - str); |
211 |
put_string (mach, "\n\t", 0); |
put_string (mach, "\n\t", 0); |
212 |
mach->ind = 1; |
mach->ind = 8; |
213 |
str = p; |
str = p; |
214 |
} |
} |
215 |
else |
else |
1768 |
static void |
static void |
1769 |
builtin_concat (struct mh_machine *mach) |
builtin_concat (struct mh_machine *mach) |
1770 |
{ |
{ |
1771 |
|
size_t size = strobj_len (&mach->arg_str); |
1772 |
|
compress_ws (strobj_ptr (&mach->arg_str), &size); |
1773 |
if (strobj_len (&mach->reg_str) == 0) |
if (strobj_len (&mach->reg_str) == 0) |
1774 |
strobj_copy (&mach->reg_str, &mach->arg_str); |
strobj_copy (&mach->reg_str, &mach->arg_str); |
1775 |
else |
else |