ftp.nice.ch/pub/next/developer/languages/c/djgpp-NS.N.bs.tar.gz#/djgpp/cplusinc/bitdo1.h

This is bitdo1.h in view mode; [Download] [Up]

#ifndef ONES
#define ONES  ((_BS_word)(~0L))
#endif
  register int nwords;
  register _BS_word mask;
  if (offset == 0)
    ;
  else if (offset + length >= _BS_BITS_PER_WORD)
    {
      mask = ONES _BS_RIGHT offset;
      DOIT(*ptr++, mask);
      length -= _BS_BITS_PER_WORD - offset;
    }
  else
    {
      mask = (ONES _BS_RIGHT (_BS_BITS_PER_WORD - length))
	_BS_LEFT (_BS_BITS_PER_WORD - length - offset);
      DOIT(*ptr, mask);
      goto done;
    }
  nwords = _BS_INDEX(length);
  while (--nwords >= 0)
   {
     DOIT(*ptr++, ONES);
   }
  length = _BS_POS (length);
  if (length)
    {
      mask = ONES _BS_LEFT (_BS_BITS_PER_WORD - length);
      DOIT(*ptr, mask);
    }
 done: ;

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.