home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / m4-1.4-src.tgz / tar.out / fsf / m4 / examples / reverse.m4 < prev    next >
Text File  |  1996-09-28  |  165b  |  5 lines
  1. define(`reverse', `ifelse(eval($# > 1), 1, `reverse(shift($@)), `$1'', ``$1'')')
  2. ``'' => reverse
  3. ``hej'' => reverse(hej)
  4. ``hej, med, dig'' => reverse(hej, med, dig)
  5.