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

Diff of /m4/m4/utility.c

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

revision 1.26 by gary, Wed Jun 18 16:21:54 2003 UTC revision 1.27 by gary, Thu Jun 19 14:51:04 2003 UTC
# Line 71  m4_string bcomm; Line 71  m4_string bcomm;
71  m4_string ecomm;  m4_string ecomm;
72    
73    
 /* Addressable function versions of the macros defined in m4private.h.  
    Since they are functions the caller does not need access to the  
    internal data structure, so they are safe to export for use in  
    external modules.  */  
 m4_symbol_type  
 m4_get_symbol_value_type (m4_symbol_value *name)  
 {  
   return VALUE_TYPE (name);  
 }  
   
 char *  
 m4_get_symbol_value_text (m4_symbol_value *name)  
 {  
   return VALUE_TEXT (name);  
 }  
   
 m4_builtin_func *  
 m4_get_symbol_value_func (m4_symbol_value *name)  
 {  
   return VALUE_FUNC (name);  
 }  
   
   
   
74  /* Give friendly warnings if a builtin macro is passed an  /* Give friendly warnings if a builtin macro is passed an
75     inappropriate number of arguments.  ARGC/ARGV are the arguments,     inappropriate number of arguments.  ARGC/ARGV are the arguments,
76     MIN is the minimum number of acceptable arguments, negative if not     MIN is the minimum number of acceptable arguments, negative if not
# Line 224  dumpdef_cmp (const void *s1, const void Line 200  dumpdef_cmp (const void *s1, const void
200  int  int
201  m4_dump_symbol (const void *name, void *symbol, void *data)  m4_dump_symbol (const void *name, void *symbol, void *data)
202  {  {
203    if (SYMBOL_TYPE ((m4_symbol *) symbol) != M4_SYMBOL_VOID)    if (((m4_symbol *) symbol)->value->type != M4_SYMBOL_VOID)
204      {      {
205        struct m4_dump_symbol_data *symbol_data        struct m4_dump_symbol_data *symbol_data
206          = (struct m4_dump_symbol_data *) data;          = (struct m4_dump_symbol_data *) data;
# Line 258  m4_dump_symbols (m4 *context, struct m4_ Line 234  m4_dump_symbols (m4 *context, struct m4_
234        for (i = 1; i < argc; i++)        for (i = 1; i < argc; i++)
235          {          {
236            symbol = m4_symbol_lookup (M4SYMTAB, M4ARG (i));            symbol = m4_symbol_lookup (M4SYMTAB, M4ARG (i));
237            if (symbol != NULL && SYMBOL_TYPE (symbol) != M4_SYMBOL_VOID)            if (symbol != NULL && symbol->value->type != M4_SYMBOL_VOID)
238              m4_dump_symbol (M4ARG (i), symbol, data);              m4_dump_symbol (M4ARG (i), symbol, data);
239            else if (complain)            else if (complain)
240              M4WARN ((warning_status, 0,              M4WARN ((warning_status, 0,

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27

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