fis-gtm/sr_port/bit_clear.c

27 lines
764 B
C

/****************************************************************
* *
* Copyright 2001 Sanchez Computer Associates, Inc. *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#include "mdef.h"
#include "bit_clear.h"
static unsigned char bit_clear_mask[8] = {127, 191, 223, 239, 247, 251, 253, 254};
uint4 bit_clear (uint4 bit, sm_uc_ptr_t base)
{
uint4 retval;
sm_uc_ptr_t ptr;
ptr = base + bit / 8;
retval = (1 << (bit & 7)) & *ptr;
*ptr &= ~(1 << (bit & 7));
return retval != 0;
}