Lines Matching defs:dptr
1041 is_digit(char digit, int num_base, fstack_t *dptr)
1052 *dptr = 0;
1062 *dptr = digit;
1587 variable_t *dptr;
1590 dptr = (variable_t *)POP(DS);
1591 *dptr = POP(DS);
1597 variable_t *dptr;
1600 dptr = (variable_t *)POP(DS);
1601 *dptr = POP(DS) + *dptr;
1607 lforth_t *dptr;
1610 dptr = (lforth_t *)POP(DS);
1611 *dptr = (lforth_t)POP(DS);
1617 wforth_t *dptr;
1620 dptr = (wforth_t *)POP(DS);
1621 *dptr = (wforth_t)POP(DS);
1627 uchar_t *dptr;
1630 dptr = (uchar_t *)POP(DS);
1631 *dptr = (uchar_t)POP(DS);
2022 token_t *dptr;
2024 dptr = (token_t *)LINK_TO_ACF(env->lastlink);
2026 log_message(MSG_WARN, "install_does: Last acf at: %p\n", (void *)dptr);
2028 *dptr = ((token_t)(IP+1)) | 1;
2034 token_t *dptr;
2042 dptr = (token_t *)LINK_TO_ACF(env->lastlink);
2043 log_message(MSG_WARN, "does: Last acf at: %p\n", (void *)dptr);
2044 *dptr = ((token_t)(HERE)) | 1;
2176 token_t *dptr;
2182 for (dptr = (token_t *)(*voc); dptr; dptr = (token_t *)(*dptr)) {
2183 if ((name = get_name(dptr)) == NULL)
2187 LINK_TO_ACF(dptr));
2188 return (LINK_TO_ACF(dptr));
2297 token_t *dptr;
2301 dptr = alloc_instance_data(env, INIT_DATA, ncells, &offset);
2302 debug_msg(DEBUG_ACTIONS, "Data: %p, offset %d\n", (char *)dptr,
2307 *dptr++ = MYSELF->data[INIT_DATA][offset++] = POP(DS);