[unix-history] / usr / src / usr.bin / pascal / libpc / MAX.c

/* Copyright (c) 1979 Regents of the University of California */

static char sccsid[] = "@(#)MAX.c 1.4 %G%";

#include "h00vars.h"

long
MAX(width, reduce, min)

	register long	width;		/* requested width */
	long		reduce;		/* amount of extra space required */
	long		min;		/* minimum amount of space needed */
{
	if (width <= 0) {
		ERROR("Non-positive format width: %D\n", width);
		return;
	}
	if ((width -= reduce) >= min)
		return width;
	return min;
}
Commit	Line	Data
e7f5228a KM	1	/* Copyright (c) 1979 Regents of the University of California */
e7f5228a KM	2
86997b19	3	static char sccsid[] = "@(#)MAX.c 1.4 %G%";
e7f5228a KM	4
e7f5228a KM	5	#include "h00vars.h"
e7f5228a	6
492cc5d3	7	long
e7f5228a KM	8	MAX(width, reduce, min)
e7f5228a KM	9
492cc5d3 KM	10	register long width; /* requested width */
	11	long reduce; /* amount of extra space required */
	12	long min; /* minimum amount of space needed */
e7f5228a	13	{
a9946ed6	14	if (width <= 0) {
86997b19	15	ERROR("Non-positive format width: %D\n", width);
e7f5228a KM	16	return;
	17	}
	18	if ((width -= reduce) >= min)
	19	return width;
	20	return min;
	21	}