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

Diff of /m4/modules/m4.c

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

revision 1.15 by akim, Wed Sep 5 07:27:00 2001 UTC revision 1.16 by akim, Wed Sep 5 07:28:49 2001 UTC
# Line 212  M4BUILTIN_HANDLER (ifdef) Line 212  M4BUILTIN_HANDLER (ifdef)
212    
213    if (m4_bad_argc (argv[0], argc, 3, 4))    if (m4_bad_argc (argv[0], argc, 3, 4))
214      return;      return;
215    symbol = m4_lookup_symbol (M4ARG (1), M4_SYMBOL_LOOKUP);    symbol = m4_symbol_lookup (M4ARG (1));
216    
217    if (symbol)    if (symbol)
218      result = M4ARG (2);      result = M4ARG (2);
# Line 279  M4BUILTIN_HANDLER (dumpdef) Line 279  M4BUILTIN_HANDLER (dumpdef)
279    
280    for (; data.size > 0; --data.size, data.base++)    for (; data.size > 0; --data.size, data.base++)
281      {      {
282        m4_symbol *symbol = m4_lookup_symbol (data.base[0], M4_SYMBOL_LOOKUP);        m4_symbol *symbol = m4_symbol_lookup (data.base[0]);
283    
284        fprintf (stderr, "%s:\t", data.base[0]);        fprintf (stderr, "%s:\t", data.base[0]);
285        switch (M4_SYMBOL_TYPE (symbol))        switch (M4_SYMBOL_TYPE (symbol))
# Line 322  M4BUILTIN_HANDLER (defn) Line 322  M4BUILTIN_HANDLER (defn)
322    if (m4_bad_argc (argv[0], argc, 2, 2))    if (m4_bad_argc (argv[0], argc, 2, 2))
323      return;      return;
324    
325    symbol = m4_lookup_symbol (M4ARG (1), M4_SYMBOL_LOOKUP);    symbol = m4_symbol_lookup (M4ARG (1));
326    if (symbol == NULL)    if (symbol == NULL)
327      return;      return;
328    
# Line 629  M4BUILTIN_HANDLER (traceon) Line 629  M4BUILTIN_HANDLER (traceon)
629      for (i = 1; i < argc; i++)      for (i = 1; i < argc; i++)
630        {        {
631          const char *name = M4_TOKEN_DATA_TEXT (argv[i]);          const char *name = M4_TOKEN_DATA_TEXT (argv[i]);
632          m4_symbol *symbol = m4_lookup_symbol (name, M4_SYMBOL_LOOKUP);          m4_symbol *symbol = m4_symbol_lookup (name);
633          if (symbol != NULL)          if (symbol != NULL)
634            set_trace (name, symbol, (char *) obs);            set_trace (name, symbol, (char *) obs);
635          else          else
# Line 648  M4BUILTIN_HANDLER (traceoff) Line 648  M4BUILTIN_HANDLER (traceoff)
648      for (i = 1; i < argc; i++)      for (i = 1; i < argc; i++)
649        {        {
650          const char *name = M4_TOKEN_DATA_TEXT (argv[i]);          const char *name = M4_TOKEN_DATA_TEXT (argv[i]);
651          m4_symbol *symbol = m4_lookup_symbol (name, M4_SYMBOL_LOOKUP);          m4_symbol *symbol = m4_symbol_lookup (name);
652          if (symbol != NULL)          if (symbol != NULL)
653            set_trace (name, symbol, NULL);            set_trace (name, symbol, NULL);
654          else          else

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

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