1*17387Sedward #ifndef lint 2*17387Sedward static char sccsid[] = "@(#)misc.c 1.1 11/18/84"; 3*17387Sedward #endif 4*17387Sedward 5*17387Sedward #include "externs.h" 6*17387Sedward 7*17387Sedward card(array, size) /* for beenthere, injuries */ 8*17387Sedward register char *array; 9*17387Sedward int size; 10*17387Sedward { 11*17387Sedward register char *end = array + size; 12*17387Sedward register int i = 0; 13*17387Sedward 14*17387Sedward while (array < end) 15*17387Sedward if (*array++) 16*17387Sedward i++; 17*17387Sedward return (i); 18*17387Sedward } 19*17387Sedward 20*17387Sedward ucard(array) 21*17387Sedward register unsigned *array; 22*17387Sedward { 23*17387Sedward register int j = 0, n; 24*17387Sedward 25*17387Sedward for (n = 0; n < NUMOFOBJECTS; n++) 26*17387Sedward if (testbit(array, n)) 27*17387Sedward j++; 28*17387Sedward return (j); 29*17387Sedward } 30