| 458 | // |
| 459 | |
| 460 | gpre_sym* MSC_symbol(sym_t type, const TEXT* string, USHORT length, gpre_ctx* object) |
| 461 | { |
| 462 | gpre_sym* symbol = (gpre_sym*) MSC_alloc(SYM_LEN + length); |
| 463 | symbol->sym_type = type; |
| 464 | symbol->sym_object = object; |
| 465 | TEXT* p = symbol->sym_name; |
| 466 | symbol->sym_string = p; |
| 467 | |
| 468 | if (length) |
| 469 | memcpy(p, string, length); |
| 470 | |
| 471 | return symbol; |
| 472 | } |
| 473 | |
| 474 | |
| 475 | //____________________________________________________________ |
no test coverage detected