home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / bbs / gnu / m4-1.1-src.lha / src / amiga / m4-1.1 / examples / reverse.m4 < prev    next >
Encoding:
Text File  |  1991-07-04  |  165 b   |  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.