/[m4]/m4/m4/input.c
ViewVC logotype

Diff of /m4/m4/input.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14 by gary, Thu Oct 11 21:09:15 2001 UTC revision 1.15 by gary, Fri Oct 12 19:57:29 2001 UTC
# Line 198  struct input_block Line 198  struct input_block
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          }          }
# Line 607  init_macro_token (m4_token *td) Line 608  init_macro_token (m4_token *td)
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    
# Line 1204  m4_next_token (m4_token *td) Line 1207  m4_next_token (m4_token *td)
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);
# Line 1211  m4_next_token (m4_token *td) Line 1216  m4_next_token (m4_token *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

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26