/[autoconf]/autoconf/lib/m4sugar/m4sugar.m4
ViewVC logotype

Diff of /autoconf/lib/m4sugar/m4sugar.m4

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

revision 2.61 by akim, Mon Mar 4 15:02:21 2002 UTC revision 2.62 by akim, Mon Mar 4 15:05:13 2002 UTC
# Line 523  m4_builtin([popdef], $@)]) Line 523  m4_builtin([popdef], $@)])
523    
524  # m4_quote(ARGS)  # m4_quote(ARGS)
525  # --------------  # --------------
526  # Return ARGS quoted.  Note that a list of quoted arguments is returned,  # Return ARGS as a single arguments.
 # not a quoted list.  
527  #  #
528  # It is important to realize the difference between `m4_quote(exp)' and  # It is important to realize the difference between `m4_quote(exp)' and
529  # `[exp]': in the first case you obtain the quoted *result* of the  # `[exp]': in the first case you obtain the quoted *result* of the
530  # expansion of EXP, while in the latter you just obtain the string  # expansion of EXP, while in the latter you just obtain the string
531  # `exp'.  # `exp'.
532  m4_define([m4_quote],  [[$*]])  m4_define([m4_quote],  [[$*]])
533  m4_define([m4_lquote], [$@])  m4_define([m4_dquote],  [[$@]])
 m4_define([m4_dquote], [[$@]])  
   
534    
535  # m4_noquote(STRING)  # m4_noquote(STRING)
536  # ------------------  # ------------------
# Line 701  m4_define([m4_car], [[$1]]) Line 698  m4_define([m4_car], [[$1]])
698  m4_define([m4_cdr], [m4_dquote(m4_shift($@))])  m4_define([m4_cdr], [m4_dquote(m4_shift($@))])
699  m4_define([_m4_foreach],  m4_define([_m4_foreach],
700  [m4_if([$2], [[]], [],  [m4_if([$2], [[]], [],
701         [m4_define([$1], [m4_car($2)])$3[]_m4_foreach([$1],         [m4_define([$1], m4_car($2))$3[]_m4_foreach([$1],
702                                                       m4_cdr($2),                                                     m4_cdr($2),
703                                                       [$3])])])                                                     [$3])])])
704    
705    
706    
# Line 1377  m4_define([m4_re_escape], Line 1374  m4_define([m4_re_escape],
1374  # ------------  # ------------
1375  # Regexp for `[a-zA-Z_0-9]*'  # Regexp for `[a-zA-Z_0-9]*'
1376  m4_define([m4_re_string],  m4_define([m4_re_string],
1377  m4_quote(m4_defn([m4_cr_symbols2]))dnl  m4_defn([m4_cr_symbols2])dnl
1378  [*]dnl  [*]dnl
1379  )  )
1380    
# Line 1386  m4_quote(m4_defn([m4_cr_symbols2]))dnl Line 1383  m4_quote(m4_defn([m4_cr_symbols2]))dnl
1383  # ----------  # ----------
1384  # Regexp for `[a-zA-Z_][a-zA-Z_0-9]*'  # Regexp for `[a-zA-Z_][a-zA-Z_0-9]*'
1385  m4_define([m4_re_word],  m4_define([m4_re_word],
1386  m4_quote(m4_defn([m4_cr_symbols1]))dnl  m4_defn([m4_cr_symbols1])dnl
1387  m4_defn([m4_re_string])dnl  m4_defn([m4_re_string])dnl
1388  )  )
1389    

Legend:
Removed from v.2.61  
changed lines
  Added in v.2.62

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