examples/quote.m4

   1 divert(`-1')
   2 # quote(args) - convert args to single-quoted string
   3 define(`quote', `ifelse(`$#', `0', `', ``$*'')')
   4 # dquote(args) - convert args to quoted list of quoted strings
   5 define(`dquote', ``$@'')
   6 # dquote_elt(args) - convert args to list of double-quoted strings
   7 define(`dquote_elt', `ifelse(`$#', `0', `', `$#', `1', ```$1''',
   8                              ```$1'',$0(shift($@))')')
   9 divert`'dnl