home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / compiler / small_c / cb / sources / xindex.c < prev   
Encoding:
Text File  |  1985-07-22  |  512 b   |  11 lines
  1.  
  2. /*
  3. ** xindex.c -- invert condition returned by index
  4. */
  5. xindex(array, c, allbut, lastto) char array[], c; int allbut, lastto; {
  6.   if(c==EOF) return -1;
  7.   else if(allbut==NO) return index(array, c);
  8.   else if(index(array, c)>-1) return -1;
  9.   else return lastto+1;
  10.   }
  11. δ/|╡╩!:├$:├g9!9═╚/|╡╩R:!9═╚/σ!9σ═╚/+╤═╨/╤σ! ╤══/├$:┴┴╔┼┼┼┼┼┼┼┼;;δ!∙9∙δ┼;!9σ!╤σ!╤══/!9σ! 9σ!σ!$9═╚/╤═o0╤╤═╨/!9σ! 9═╚/σ!╤═╚/╤═╨/!9═╚/═┬/σ!?╤═δ/|╡╩σ:!9σ!╤═╨/!9σ═╚/#╤═╨/├±:!9σ!╤═╨/! 9σ!9σ═╚/#╤