Home
last modified time | relevance | path

Searched refs:id_ptr (Results 1 – 4 of 4) sorted by relevance

/original-bsd/usr.bin/pascal/src/
H A Dfhdr.c55 if (inpflist(r->p_dec.id_ptr)) {
63 (p=lookup1(r->p_dec.id_ptr)) != NIL && bn == cbn) {
121 program = p = defnl(r->p_dec.id_ptr, PROG, NLNIL, 0);
127 p = enter(defnl(r->p_dec.id_ptr, PROC, NLNIL, 0));
130 enclosing[ cbn ] = r->p_dec.id_ptr;
147 p = enter(defnl(r->p_dec.id_ptr, FUNC, temp, NIL));
165 enclosing[ cbn ] = r->p_dec.id_ptr;
192 cp = defnl(r->p_dec.id_ptr, FVAR, p->type, 0);
205 cp = defnl(r->p_dec.id_ptr, FVAR, p->type,
H A Dpclval.c94 tr.field_node.id_ptr = v_node->cptr;
232 p = reclook(p, co->field_node.id_ptr);
348 if ( co->field_node.id_ptr == NIL ) {
351 p = reclook( p , co->field_node.id_ptr );
353 error("%s is not a field in this record", co->field_node.id_ptr);
H A Dtree_ty.h32 char *id_ptr; member
45 char *id_ptr; member
80 char *id_ptr; member
H A Dlval.c104 tr.field_node.id_ptr = var->var_node.cptr;
274 if (co->field_node.id_ptr == NIL) {
277 p = reclook(p, co->field_node.id_ptr);
279 error("%s is not a field in this record", co->field_node.id_ptr);