325 |
|
|
326 |
i->u.u_b.func = TOKEN_FUNC (td); |
i->u.u_b.func = TOKEN_FUNC (td); |
327 |
i->u.u_b.handle = TOKEN_HANDLE (td); |
i->u.u_b.handle = TOKEN_HANDLE (td); |
328 |
|
i->u.u_b.arg_signature= TOKEN_ARG_SIGNATURE (td); |
329 |
i->u.u_b.min_args = TOKEN_MIN_ARGS (td); |
i->u.u_b.min_args = TOKEN_MIN_ARGS (td); |
330 |
i->u.u_b.max_args = TOKEN_MAX_ARGS (td); |
i->u.u_b.max_args = TOKEN_MAX_ARGS (td); |
331 |
i->u.u_b.flags = TOKEN_FLAGS (td); |
i->u.u_b.flags = TOKEN_FLAGS (td); |
531 |
TOKEN_FUNC (td) = isp->u.u_b.func; |
TOKEN_FUNC (td) = isp->u.u_b.func; |
532 |
TOKEN_HANDLE (td) = isp->u.u_b.handle; |
TOKEN_HANDLE (td) = isp->u.u_b.handle; |
533 |
TOKEN_FLAGS (td) = isp->u.u_b.flags; |
TOKEN_FLAGS (td) = isp->u.u_b.flags; |
534 |
|
TOKEN_ARG_SIGNATURE(td) = isp->u.u_b.arg_signature; |
535 |
TOKEN_MIN_ARGS (td) = isp->u.u_b.min_args; |
TOKEN_MIN_ARGS (td) = isp->u.u_b.min_args; |
536 |
TOKEN_MAX_ARGS (td) = isp->u.u_b.max_args; |
TOKEN_MAX_ARGS (td) = isp->u.u_b.max_args; |
537 |
} |
} |
572 |
} |
} |
573 |
} |
} |
574 |
|
|
575 |
/* The function peek_input () is used to look at the next character in |
/* The function m4_peek_input () is used to look at the next character in |
576 |
the input stream. At any given time, it reads from the input_block |
the input stream. At any given time, it reads from the input_block |
577 |
on the top of the current input stack. */ |
on the top of the current input stack. */ |
578 |
int |
int |
732 |
|
|
733 |
|
|
734 |
/* Parse and return a single token from the input stream. A token can |
/* Parse and return a single token from the input stream. A token can |
735 |
either be TOKEN_EOF, if the input_stack is empty; it can be TOKEN_STRING |
either be M4_TOKEN_EOF, if the input_stack is empty; it can be |
736 |
for a quoted string; TOKEN_WORD for something that is a potential macro |
M4_TOKEN_STRING for a quoted string; M4_TOKEN_WORD for something that |
737 |
name; and TOKEN_SIMPLE for any single character that is not a part of |
is a potential macro name; and M4_TOKEN_SIMPLE for any single character |
738 |
any of the previous types. |
that is not a part of any of the previous types. |
739 |
|
|
740 |
Next_token () return the token type, and passes back a pointer to the |
M4_next_token () returns the token type, and passes back a pointer to the |
741 |
token data through TD. The token text is collected on the obstack |
token data through TD. The token text is collected on the obstack |
742 |
token_stack, which never contains more than one token text at a time. |
token_stack, which never contains more than one token text at a time. |
743 |
The storage pointed to by the fields in TD is therefore subject to |
The storage pointed to by the fields in TD is therefore subject to |