1 /*
2  * Copyright (c) 1988, 1989, 1990, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley by
6  * Adam de Boor.
7  *
8  * %sccs.include.redist.c%
9  */
10 
11 #ifndef lint
12 static char sccsid[] = "@(#)lstForEach.c	8.2 (Berkeley) 04/28/95";
13 #endif /* not lint */
14 
15 /*-
16  * LstForeach.c --
17  *	Perform a given function on all elements of a list.
18  */
19 
20 #include	"lstInt.h"
21 
22 /*-
23  *-----------------------------------------------------------------------
24  * Lst_ForEach --
25  *	Apply the given function to each element of the given list. The
26  *	function should return 0 if Lst_ForEach should continue and non-
27  *	zero if it should abort.
28  *
29  * Results:
30  *	None.
31  *
32  * Side Effects:
33  *	Only those created by the passed-in function.
34  *
35  *-----------------------------------------------------------------------
36  */
37 /*VARARGS2*/
38 void
39 Lst_ForEach (l, proc, d)
40     Lst	    	  	l;
41     register int	(*proc) __P((ClientData, ClientData));
42     register ClientData	d;
43 {
44     Lst_ForEachFrom(l, Lst_First(l), proc, d);
45 }
46 
47