{
struct psi_token *T;
- T = calloc(1, sizeof(*T));
+ T = pecalloc(1, sizeof(*T), 1);
T->type = token_typ;
T->col = col;
T->line = line;
T->file = zend_string_copy(file);
- T->text = zend_string_init(token_txt, token_len, 1);
+ T->text = zend_string_init_interned(token_txt, token_len, 1);
#if PSI_DEBUG_TOKEN_ALLOC
fprintf(stderr, "PSI: token_init %p\n", T);
#endif
}
struct psi_token *psi_token_copy(struct psi_token *src) {
- struct psi_token *ptr = malloc(sizeof(*ptr));
+ struct psi_token *ptr = pemalloc(sizeof(*ptr), 1);
*ptr = *src;
#if PSI_DEBUG_TOKEN_ALLOC
va_list argv;
unsigned i;
size_t sep_len = sep ? strlen(sep) : 0;
- struct psi_token *T = malloc(sizeof(*T));
+ struct psi_token *T = pemalloc(sizeof(*T), 1);
smart_str text = {0};
va_start(argv, argc);