home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume13 / m4 / part02 / ack.m4 next >
Encoding:
Text File  |  1988-02-27  |  121 b   |  4 lines
  1. define(DECR,`eval($1-1)')
  2. define(ack, `ifelse($1,0,incr($2),$2,0,`ack(DECR($1),1)',
  3. `ack(DECR($1), ack($1,DECR($2)))')')
  4.