1*1704Smckusick /* Copyright (c) 1979 Regents of the University of California */ 2*1704Smckusick 3*1704Smckusick static char sccsid[] = "@(#)SUBSC.c 1.1 10/30/80"; 4*1704Smckusick 5*1704Smckusick #include "h01errs.h" 6*1704Smckusick 7*1704Smckusick SUBSC(i, lower, upper) 8*1704Smckusick 9*1704Smckusick long i, lower, upper; 10*1704Smckusick { 11*1704Smckusick if (i < lower || i > upper) { 12*1704Smckusick ERROR(ESUBSC, i); 13*1704Smckusick } 14*1704Smckusick return i; 15*1704Smckusick } 16