SetBit Routines |
Unit
QESBPCSSystem
Overloaded Variants |
Procedure SetBit(var BitList: TESBBitList; const I: Byte); |
Procedure SetBit(var BitList: TESBLongBitList; const I: Byte); |
Declaration
Procedure SetBit(var BitList: TESBBitList; const I: Byte);
Parameters |
BitList | BitList to process. |
I | Bit to clear, starts at 0. |
Category
Memory OperationsImplementation
procedure SetBit (var BitList: TESBBitList; const I: Byte); asm and edx, $0f bts [eax], edx //Set to 1 the bit #I End; |
Declaration
Procedure SetBit(var BitList: TESBLongBitList; const I: Byte);Implementation
procedure SetBit (var BitList: TESBLongBitList; const I: Byte); asm and edx, $1f bts [eax], edx //Set to 1 the bit #I End; |
|