1: /* Copyright (c) 1979 Regents of the University of California */
   2: 
   3: static char sccsid[] = "@(#)SUBSCZ.c 1.4 11/12/82";
   4: 
   5: extern char ESUBSC[];   /* ESUBSC is defined in SUBSCZ.c */
   6: 
   7: long
   8: SUBSCZ(value, upper)
   9:     long        value;
  10:     unsigned long   upper;
  11: {
  12:     if (value > upper) {
  13:         ERROR(ESUBSC, value);
  14:         return;
  15:     }
  16:     return value;
  17: }

Defined functions

SUBSCZ defined in line 7; used 1 times

Defined variables

sccsid defined in line 3; never used
Last modified: 1983-02-01
Generated: 2016-12-26
Generated by src2html V0.67
page hit count: 911
Valid CSS Valid XHTML 1.0 Strict