copy strings in stack from top - n up to top - 1 to buffer */
| 462 | |
| 463 | /* copy strings in stack from top - n up to top - 1 to buffer */ |
| 464 | static void copy2buff (StkId top, int n, char *buff) { |
| 465 | size_t tl = 0; /* size already copied */ |
| 466 | do { |
| 467 | size_t l = vslen(top - n); /* length of string being copied */ |
| 468 | memcpy(buff + tl, svalue(top - n), l * sizeof(char)); |
| 469 | tl += l; |
| 470 | } while (--n > 0); |
| 471 | } |
| 472 | |
| 473 | |
| 474 | /* |