198 |
m4_builtin_func *func;/* pointer to macros function */ |
m4_builtin_func *func;/* pointer to macros function */ |
199 |
lt_dlhandle handle; /* originating module */ |
lt_dlhandle handle; /* originating module */ |
200 |
int flags; /* flags associated with the builtin */ |
int flags; /* flags associated with the builtin */ |
201 |
|
int min_args, max_args; /* argv maxima and minima for the builtin. */ |
202 |
boolean traced; /* TRUE iff builtin is traced */ |
boolean traced; /* TRUE iff builtin is traced */ |
203 |
boolean read; /* TRUE iff block has been read */ |
boolean read; /* TRUE iff block has been read */ |
204 |
} |
} |
608 |
TOKEN_FUNC (td) = isp->u.u_m.func; |
TOKEN_FUNC (td) = isp->u.u_m.func; |
609 |
TOKEN_HANDLE (td) = isp->u.u_m.handle; |
TOKEN_HANDLE (td) = isp->u.u_m.handle; |
610 |
TOKEN_FLAGS (td) = isp->u.u_m.flags; |
TOKEN_FLAGS (td) = isp->u.u_m.flags; |
611 |
|
TOKEN_MIN_ARGS (td) = isp->u.u_m.min_args; |
612 |
|
TOKEN_MAX_ARGS (td) = isp->u.u_m.max_args; |
613 |
} |
} |
614 |
|
|
615 |
|
|
1207 |
TOKEN_TEXT (td) = obstack_finish (&token_stack); |
TOKEN_TEXT (td) = obstack_finish (&token_stack); |
1208 |
TOKEN_HANDLE (td) = NULL; |
TOKEN_HANDLE (td) = NULL; |
1209 |
TOKEN_FLAGS (td) = 0x0; |
TOKEN_FLAGS (td) = 0x0; |
1210 |
|
TOKEN_MIN_ARGS (td) = -1; |
1211 |
|
TOKEN_MAX_ARGS (td) = -1; |
1212 |
|
|
1213 |
#ifdef DEBUG_INPUT |
#ifdef DEBUG_INPUT |
1214 |
print_token("next_token", type, td); |
print_token("next_token", type, td); |
1216 |
|
|
1217 |
return type; |
return type; |
1218 |
} |
} |
1219 |
|
|
1220 |
|
void |
1221 |
|
m4_token_copy (m4_token *dest, m4_token *src) |
1222 |
|
{ |
1223 |
|
TOKEN_TYPE (dest) = TOKEN_TYPE (src); |
1224 |
|
TOKEN_FUNC (dest) = TOKEN_FUNC (src); |
1225 |
|
TOKEN_HANDLE (dest) = TOKEN_HANDLE (src); |
1226 |
|
TOKEN_FLAGS (dest) = TOKEN_FLAGS (src); |
1227 |
|
TOKEN_MIN_ARGS (dest) = TOKEN_MIN_ARGS (src); |
1228 |
|
TOKEN_MAX_ARGS (dest) = TOKEN_MAX_ARGS (src); |
1229 |
|
} |
1230 |
|
|
1231 |
|
|
1232 |
#ifdef DEBUG_INPUT |
#ifdef DEBUG_INPUT |