xref: /csrg-svn/usr.bin/m4/TEST/ack.m4 (revision 38813)
1*38813Sbostic#
2*38813Sbostic# Copyright (c) 1989 The Regents of the University of California.
3*38813Sbostic# All rights reserved.
4*38813Sbostic#
5*38813Sbostic# This code is derived from software contributed to Berkeley by
6*38813Sbostic# Ozan Yigit.
7*38813Sbostic#
8*38813Sbostic# Redistribution and use in source and binary forms are permitted
9*38813Sbostic# provided that the above copyright notice and this paragraph are
10*38813Sbostic# duplicated in all such forms and that any documentation,
11*38813Sbostic# advertising materials, and other materials related to such
12*38813Sbostic# distribution and use acknowledge that the software was developed
13*38813Sbostic# by the University of California, Berkeley.  The name of the
14*38813Sbostic# University may not be used to endorse or promote products derived
15*38813Sbostic# from this software without specific prior written permission.
16*38813Sbostic# THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
17*38813Sbostic# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
18*38813Sbostic# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
19*38813Sbostic#
20*38813Sbostic#	@(#)ack.m4	5.1 (Berkeley) 08/28/89
21*38813Sbostic#
22*38813Sbostic
23*38813Sbosticdefine(ack, `ifelse($1,0,incr($2),$2,0,`ack(DECR($1),1)',
24*38813Sbostic`ack(DECR($1), ack($1,DECR($2)))')')
25