texk/web2c/tex.web

3323 @d temp_head==mem_top-3 {head of a temporary list of some kind}
6609   matching: begin print("argument"); p:=temp_head;
7999 repeat link(temp_head):=null;
8002   p:=temp_head; m:=0;
8083 pstack[n]:=link(temp_head); align_state:=align_state-unbalance;
8151 begin if (m=1)and(info(p)<right_brace_limit)and(p<>temp_head) then
8153   p:=link(temp_head); pstack[n]:=link(p); free_avail(p);
8155 else pstack[n]:=link(temp_head);
9139 The token list created by |str_toks| begins at |link(temp_head)| and ends
9140 at the value |p| that is returned. (If |p=temp_head|, the list is empty.)
9149 p:=temp_head; link(p):=null; k:=b;
9188 begin p:=temp_head; link(p):=null;
9202 begin link(garbage):=the_toks; ins_list(link(temp_head));
9251 selector:=old_setting; link(garbage):=str_toks(b); ins_list(link(temp_head));
9390     if link(temp_head)<>null then
9391       begin link(p):=link(temp_head); p:=q;
14133 |mlist_to_hlist| has acted, |link(temp_head)| points to the translated hlist.
14173 mlist_to_hlist; q:=link(temp_head); {recursive call}
14836   p:=hpack(link(temp_head),natural);
14954 p:=temp_head; link(p):=null; q:=mlist; r_type:=0; cur_style:=style;
16049 @ The first task is to move the list from |head| to |temp_head| and go
16061 link(temp_head):=link(head);
16943 starting at |link(temp_head)|, and calls |try_break| at each legal
16981   cur_p:=link(temp_head); auto_breaking:=true;@/
17017 passive:=null; printed_node:=temp_head; pass_number:=0;
17261 if (cur_line<>best_line)or(link(temp_head)<>null) then
17286 begin r:=temp_head;
17296 done1: if r<>temp_head then
17297   begin link(r):=null; flush_node_list(link(temp_head));
17298   link(temp_head):=q;
17303 at |link(temp_head)| and ending at |cur_break(cur_p)|. If |cur_break(cur_p)| is
17336 else  begin q:=temp_head;
17385 |link(temp_head)| pointing to the remainder of the paragraph, if any.
17388 r:=link(q); link(q):=null; q:=link(temp_head); link(temp_head):=r;
18852 begin prev_p:=temp_head; link(temp_head):=p;
18865 prune_page_top:=link(temp_head);
20642 else  begin back_input; p:=get_avail; link(temp_head):=p;
20646   print(" inserted"); ins_list(link(temp_head));
20656 @ At this point, |link(temp_head)=p|, a pointer to an empty one-word node.
22398   mlist_to_hlist; a:=hpack(link(temp_head),natural);
22443 link(tail):=link(temp_head);
22485 mlist_to_hlist; p:=link(temp_head);@/
23702 print_nl("> "); token_show(temp_head);
23703 flush_list(link(temp_head)); goto common_ending;