1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)RANG4.c 1.3 06/10/81"; 4 5 6 long 7 RANG4(value, lower, upper) 8 9 long value; 10 long lower; 11 long upper; 12 { 13 if (value < lower || value > upper) { 14 ERROR("Value of %D is out of range\n", value); 15 return; 16 } 17 return value; 18 } 19