BEqu -> BEqual, rqst -> request

This commit is contained in:
xmm15 2020-02-15 21:41:28 -06:00
parent 4e834e43af
commit bf7568b833
50 changed files with 106 additions and 106 deletions

Binary file not shown.

View File

@ -12,7 +12,7 @@ U0 Models()
"\n\n$$BT,\"Ball\",LE=T_BALL$$\n\n";
"$$LM,0$$";
i=DocMenu(DocPut);
LBEqu(&(DocPut)->flags,DOCf_FORM,old_form);
LBEqual(&(DocPut)->flags,DOCf_FORM,old_form);
DocBottom;
switch (i) {
case T_MAN:

View File

@ -516,13 +516,13 @@ mo_got_message:
while (psm.cur_note->last!=&psm.head) {
psm.cur_note=psm.cur_note->last;
if (psm.cur_note!=&psm.head)
LBEqu(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
LBEqual(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
}
} else {
if (psm.cur_note->last!=&psm.head) {
psm.cur_note=psm.cur_note->last;
if (psm.cur_note!=&psm.head)
LBEqu(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
LBEqual(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
}
}
break;
@ -530,13 +530,13 @@ mo_got_message:
if (arg2&SCF_CTRL) {
while (psm.cur_note!=&psm.head) {
if (psm.cur_note!=&psm.head)
LBEqu(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
LBEqual(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
psm.cur_note=psm.cur_note->next;
}
} else {
if (psm.cur_note!=&psm.head) {
if (psm.cur_note!=&psm.head)
LBEqu(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
LBEqual(&psm.cur_note->flags,PSMf_SEL,arg2&SCF_SHIFT);
psm.cur_note=psm.cur_note->next;
}
}

View File

@ -116,7 +116,7 @@ Bool UnitMove(Unit *tmpu,I64 x,I64 y)
tmpu->row=r;
tmpu->col=c;
VisRecalc(VR_UPDATE_FRIENDLY_UNIT,tmpu);
LBEqu(&tmpu->vis[enemy_player],0,
LBEqual(&tmpu->vis[enemy_player],0,
VisRecalc(VR_ONE_ENEMY_UNIT,tmpu));
} else
break;

View File

@ -24,7 +24,7 @@ U0 VRSetUp(I64 player)
ut1=&units[player^1][0];
for (i=0;i<UNITS_NUM;i++,ut0++,ut1++) {
LBtr(&ut1->vis[player],0);
LBEqu(&ut0->vis[player],0,ut0->life>0);
LBEqual(&ut0->vis[player],0,ut0->life>0);
}
}
@ -41,7 +41,7 @@ U0 VRMerge(I64 player)
}
ut1=&units[player^1][0];
for (j=0;j<UNITS_NUM;j++,ut1++)
LBEqu(&ut1->vis[player],0,Bt(mask,j) && ut1->life>0);
LBEqual(&ut1->vis[player],0,Bt(mask,j) && ut1->life>0);
Free(mask);
}
@ -77,7 +77,7 @@ Bool MPVisRecalc(MPCtrl1 *job)
}
}
if (job->mode==VR_UPDATE_FRIENDLY_UNIT)
LBEqu(&vis_unit_bitmap[cur_player],
LBEqual(&vis_unit_bitmap[cur_player],
i+job->tmpu->num*((UNITS_NUM+7)&~7),seen);
}
break;

View File

@ -655,7 +655,7 @@ move_redundant:
}
if (tmpi->ic_count>last_start>tmpi->ic_last_start)
tmpi->ic_last_start=last_start;
BEqu(&tmpi->ic_flags,ICf_LOCK,old_lock);
BEqual(&tmpi->ic_flags,ICf_LOCK,old_lock);
}
U0 ICLea(CIntermediateCode *tmpi,CICType t1,I64 r1,I64 d1,

View File

@ -1,6 +1,6 @@
Bool Option(I64 num,Bool val)
{//Set compiler $LK,"Option",A="FI:::/Doc/Options.DD"$ to val.
return BEqu(&Fs->last_cc->opts,num,val);
return BEqual(&Fs->last_cc->opts,num,val);
}
Bool GetOption(I64 num)

Binary file not shown.

View File

@ -1128,7 +1128,7 @@ U8 *LexExpression2Bin(CCompCtrl *cc,I64 *_type=NULL)
} else
res=NULL;
COCPop(cc);
BEqu(&cc->flags,CCf_PASS_TRACE_PRESENT,old_trace);
BEqual(&cc->flags,CCf_PASS_TRACE_PRESENT,old_trace);
return res;
}

View File

@ -107,7 +107,7 @@ CHashFun *ParseFunJoin(CCompCtrl *cc,CHashClass *tmp_return,
if (name) //if not fun_ptr
HashAdd(tmpf,cc->htc.glbl_hash_table);
}
BEqu(&tmpf->type,HTf_PUBLIC,fsp_flags&FSF_PUBLIC);
BEqual(&tmpf->type,HTf_PUBLIC,fsp_flags&FSF_PUBLIC);
tmpf->return_class=tmp_return;
tmpf->use_count=0;
HashSrcFileSet(cc,tmpf);

View File

@ -522,7 +522,7 @@ U0 SquadronActions()
ObjLaunch(tmps->player,i,tmps->host,,,tmps->é);
tmpo=tmps->next_in_squadron;
while (tmpo!=tmps) {
LBEqu(&completed_mask,tmpo->member_num,tmpo->flags&OF_ACTIVE);
LBEqual(&completed_mask,tmpo->member_num,tmpo->flags&OF_ACTIVE);
tmpo=tmpo->next_in_squadron;
}
if (completed_mask|tmps->dead_mask==tmps->total_mask)
@ -531,7 +531,7 @@ U0 SquadronActions()
case SA_FLYING:
tmpo=tmps->next_in_squadron;
while (tmpo!=tmps) {
LBEqu(&completed_mask,tmpo->member_num,!(tmpo->flags&OF_ACTIVE));
LBEqual(&completed_mask,tmpo->member_num,!(tmpo->flags&OF_ACTIVE));
tmpo=tmpo->next_in_squadron;
}
if (completed_mask|tmps->dead_mask==tmps->total_mask)
@ -549,7 +549,7 @@ U0 SquadronActions()
tmpo=tmps->next_in_squadron;
while (tmpo!=tmps) {
tmpo->flags|=OF_RETURNING;
LBEqu(&completed_mask,tmpo->member_num,!(tmpo->flags&OF_ACTIVE));
LBEqual(&completed_mask,tmpo->member_num,!(tmpo->flags&OF_ACTIVE));
tmpo=tmpo->next_in_squadron;
}
if (completed_mask|tmps->dead_mask==tmps->total_mask)

View File

@ -4,7 +4,7 @@ $WW,1$$FG,2$Bt$FG$: Bit Test
$FG,2$Bts$FG$: Bit Test and Set to one
$FG,2$Btr$FG$: Bit Test and Reset to zero
$FG,2$Btc$FG$: Bit Test and Compliment (toggle)
$FG,2$BEqu$FG$: Set bit to value.
$FG,2$BEqual$FG$: Set bit to value.
$FG$Bit operations are "atomic", no interrupt between the reading and writing the bit, important when multitasking. For multicore use "locked" forms.$FG$

View File

@ -197,7 +197,7 @@ $FG,2$Q$FG$-$FG,2$S$FG$ are ISO file write drives.
$FG,2$T$FG$-$FG,2$Z$FG$ are ATAPI CD/DVD drives.
For commands taking a drive letter as an argument, char $FG,2$0$FG$ is the current drive.
$ID,-2$$LK,"Bt, Bts, Btr, Btc, BEqu",A="HI:Bit"$
$ID,-2$$LK,"Bt, Bts, Btr, Btc, BEqual",A="HI:Bit"$
$LK,"Define",A="HI:Define"$
$LK,"DolDoc",A="FI:::/Doc/DolDocOverview.DD"$
$LK,"Editor Link Types",A="MN:LK_FILE"$

Binary file not shown.

View File

@ -216,7 +216,7 @@ I64 ATAReadNativeMax(CBlkDev *bd,F64 timeout)
if (ATAGetDevId(bd,timeout,TRUE)==BDT_NULL)
okay=FALSE;
else
BEqu(&bd->flags,BDf_EXT_SIZE,Bt(&bd->dev_id_record[86],10));
BEqual(&bd->flags,BDf_EXT_SIZE,Bt(&bd->dev_id_record[86],10));
}
if (okay) {
if (bd->flags & BDF_EXT_SIZE && bd->base1) {

View File

@ -142,7 +142,7 @@ public I64 ATARep(Bool prompt=TRUE,Bool just_ide=FALSE,CATARep **_head=NULL)
for (i=0;i<BLKDEVS_NUM;i++)
if (blkdev.blkdevs[i].bd_signature==BD_SIGNATURE_VAL)
BEqu(&unlock_flags,i,
BEqual(&unlock_flags,i,
BlkDevLock(&blkdev.blkdevs[i]));
if (!just_ide)

View File

@ -171,7 +171,7 @@ Bool DriveEnable(U8 drv_let,Bool val)
{//Can unmount or remount, but not mount the first time.
CDrive *drive;
if (drive=Letter2Drive(drv_let,FALSE))
return !LBEqu(&drive->fs_type,FStf_DISABLE,!val);
return !LBEqual(&drive->fs_type,FStf_DISABLE,!val);
else
return FALSE;
}

View File

@ -161,15 +161,15 @@ CJob *TaskMessage(CTask *_srv,CTask *master,
return tmpc;
}
Bool JobResScan(CJob *rqst=NULL,I64 *_res=NULL)
{//Check rqst complete, return with or without.
Bool JobResScan(CJob *request=NULL,I64 *_res=NULL)
{//Check request complete, return with or without.
CJobCtrl *ctrl;
CJob *tmpc,*tmpc1;
if (!rqst || Bt(&rqst->flags,JOBf_DONE)) {
if (!rqst || rqst->master_task)
if (!request || Bt(&request->flags,JOBf_DONE)) {
if (!request || request->master_task)
ctrl=&Fs->srv_ctrl;
else
ctrl=rqst->ctrl;
ctrl=request->ctrl;
PUSHFD
CLI
while (LBts(&ctrl->flags,JOBCf_LOCKED))
@ -177,7 +177,7 @@ Bool JobResScan(CJob *rqst=NULL,I64 *_res=NULL)
tmpc1=&ctrl->next_done;
tmpc=tmpc1->next;
while (tmpc!=tmpc1) {
if (!rqst || rqst==tmpc) {
if (!request || request==tmpc) {
QueueRemove(tmpc);
LBtr(&ctrl->flags,JOBCf_LOCKED);
POPFD
@ -196,25 +196,25 @@ Bool JobResScan(CJob *rqst=NULL,I64 *_res=NULL)
return FALSE;
}
I64 JobResGet(CJob *rqst=NULL)
I64 JobResGet(CJob *request=NULL)
{//See $LK,"::/Demo/MultiCore/Lock.HC"$
I64 res;
CJob *tmpc1;
if (!rqst) {
if (!request) {
tmpc1=&Fs->srv_ctrl.next_done;
while (tmpc1==tmpc1->next) {
LBts(&Fs->task_flags,TASKf_IDLE);
Yield;
}
} else {
while (!Bt(&rqst->flags,JOBf_DONE)) {
while (!Bt(&request->flags,JOBf_DONE)) {
LBts(&Fs->task_flags,TASKf_IDLE);
Yield;
}
}
LBtr(&Fs->task_flags,TASKf_IDLE);
//Could get taken by someone else.
JobResScan(rqst,&res);
JobResScan(request,&res);
return res;
}

View File

@ -226,7 +226,7 @@ U0 RawPrint(I64 mS=100,U8 *format,...)
"%s",buf;
Busy(mS<<10);
POPFD
LBEqu(&Fs->task_flags,TASKf_INPUT_FILTER_TASK,old_input_filter);
LBEqual(&Fs->task_flags,TASKf_INPUT_FILTER_TASK,old_input_filter);
Raw(old_raw);
Free(buf);
}
@ -243,7 +243,7 @@ U0 RawD(I64 mS=100,U8 *addr,I64 count=0x80)
D(addr,count);
Busy(mS<<10);
POPFD
LBEqu(&Fs->task_flags,TASKf_INPUT_FILTER_TASK,old_input_filter);
LBEqual(&Fs->task_flags,TASKf_INPUT_FILTER_TASK,old_input_filter);
Raw(old_raw);
}
@ -259,7 +259,7 @@ U0 RawDm(I64 mS=100,U8 *addr,I64 count=0x80)
Dm(addr,count);
Busy(mS<<10);
POPFD
LBEqu(&Fs->task_flags,TASKf_INPUT_FILTER_TASK,old_input_filter);
LBEqual(&Fs->task_flags,TASKf_INPUT_FILTER_TASK,old_input_filter);
Raw(old_raw);
}
@ -558,7 +558,7 @@ U0 Debug2()
UserTaskCont;
fp_getstr2=old_getstr2;
Fs->win_inhibit=old_win_inhibit;
LBEqu(&Fs->task_flags,TASKf_AWAITING_MESSAGE,old_waiting_message);
LBEqual(&Fs->task_flags,TASKf_AWAITING_MESSAGE,old_waiting_message);
}
U0 Fault3(I64 fault_num,I64 fault_err_code)

View File

@ -149,7 +149,7 @@ U0 SleepUntil(I64 wake_jiffy)
Bool old_idle=LBts(&Fs->task_flags,TASKf_IDLE);
Fs->wake_jiffy=wake_jiffy;
Yield;
LBEqu(&Fs->task_flags,TASKf_IDLE,old_idle);
LBEqual(&Fs->task_flags,TASKf_IDLE,old_idle);
}
U0 Sleep(I64 mS)
@ -269,7 +269,7 @@ Bool IsMute()
Bool Silent(Bool val=ON)
{//Turn-off StdOut console text. (Not sound.)
return LBEqu(&Fs->display_flags,DISPLAYf_SILENT,val);
return LBEqual(&Fs->display_flags,DISPLAYf_SILENT,val);
}
Bool IsSilent()
@ -279,7 +279,7 @@ Bool IsSilent()
Bool SysDebug(Bool val)
{//Set SysDebug bit you can use while debugging.
return LBEqu(&sys_semas[SEMA_DEBUG],0,val);
return LBEqual(&sys_semas[SEMA_DEBUG],0,val);
}
Bool IsSysDebug()
@ -291,7 +291,7 @@ Bool Raw(Bool val)
{//Set to direct scrn, BLACK & WHITE, non-windowed output mode.
if (!val)
VGAFlush;
return !LBEqu(&Fs->display_flags,DISPLAYf_NOT_RAW,!val);
return !LBEqual(&Fs->display_flags,DISPLAYf_NOT_RAW,!val);
}
Bool IsRaw()
@ -301,7 +301,7 @@ Bool IsRaw()
Bool SingleUser(Bool val)
{//Set single-user mode.
return LBEqu(&sys_semas[SEMA_SINGLE_USER],0,val);
return LBEqual(&sys_semas[SEMA_SINGLE_USER],0,val);
}
Bool IsSingleUser()
@ -311,7 +311,7 @@ Bool IsSingleUser()
Bool DebugMode(Bool val)
{//Set debug-mode.
return LBEqu(&sys_semas[SEMA_DBG_MODE],0,val);
return LBEqual(&sys_semas[SEMA_DBG_MODE],0,val);
}
Bool IsDebugMode()

View File

@ -81,7 +81,7 @@ Bool Suspend(CTask *task=NULL,Bool state=TRUE)
PUSHFD
CLI
if (TaskValidate(task))
res=LBEqu(&task->task_flags,TASKf_SUSPENDED,state);
res=LBEqual(&task->task_flags,TASKf_SUSPENDED,state);
else
res=FALSE;
POPFD

View File

@ -85,7 +85,7 @@ _MEMCOMPARE::
POP RSI
POP RBP
RET1 24
_BEQU::
_BEQUAL::
PUSH RBP
MOV RBP,RSP
XOR RAX,RAX
@ -100,7 +100,7 @@ _BEQU::
@@10: ADC AL,0
POP RBP
RET1 24
_LBEQU::
_LBEQUAL::
PUSH RBP
MOV RBP,RSP
XOR RAX,RAX

View File

@ -379,7 +379,6 @@ $LK,"_LXCHG_U8",A="FL:::/Kernel/KUtils.HC,244"$
$LK,"CtrlAltX",A="FL:::/Kernel/KeyDev.HC,173",BI=80$
$LK,"UserTaskCont",A="FL:::/Kernel/KTask.HC,384",BI=81$
$LK,"RFLAGf_NESTED_TASK",A="FL:::/Kernel/KernelA.HH,332"$
$LK,"BEqu",A="FL:::/Kernel/KernelB.HH,28"$
$LK,"FAT32MkDir",A="FL:::/Kernel/BlkDev/FileSysFAT.HC,919",BI=82$
$LK,"ClusBlkRead",A="FL:::/Kernel/BlkDev/DiskClus.HC,44",BI=83$
$LK,"_MEMCOPY",A="FL:::/Kernel/KUtils.HC,55"$
@ -527,7 +526,6 @@ $LK,"MSF_FIXED",A="FL:::/Kernel/KernelA.HH,209"$
$LK,"screencast",A="FL:::/Kernel/KGlobals.HC,29"$
$LK,"MEM_HEAP_BASE",A="FL:::/Kernel/KStart32.HC,6"$
$LK,"_CPUID",A="FL:::/Kernel/KUtils.HC,319"$
$LK,"_LBEQU",A="FL:::/Kernel/KUtils.HC,104"$
$LK,"Caller",A="FL:::/Kernel/KDebug.HC,60",BI=114$
$LK,"SUF_S2T",A="FL:::/Kernel/KernelA.HH,3737"$
$LK,"ATA_DEV_RST",A="FL:::/Kernel/KernelA.HH,2270"$
@ -723,6 +721,7 @@ $LK,"HashFunSegFind",A="FL:::/Kernel/FunSeg.HC,10",BI=139$
$LK,"Dr",A="FL:::/Kernel/KDebug.HC,328",BI=140$
$LK,"FBlkRead",A="FL:::/Kernel/BlkDev/DiskCFile.HC,129",BI=141$
$LK,"CPUId",A="FL:::/Kernel/KernelB.HH,263"$
$LK,"_BEQUAL",A="FL:::/Kernel/KUtils.HC,89"$
$LK,"ARC_BITS_MAX",A="FL:::/Kernel/KernelA.HH,3685"$
$LK,"FilesFind2",A="FL:::/Kernel/BlkDev/DiskFind.HC,1",BI=142$
$LK,"TaskKillDying",A="FL:::/Kernel/KTask.HC,528",BI=143$
@ -900,7 +899,6 @@ $LK,"RedSeaFileFind",A="FL:::/Kernel/BlkDev/FileSysRedSea.HC,155",BI=182$
$LK,"CTRLF_CAPTURE_RIGHT_MS",A="FL:::/Kernel/KernelA.HH,3046"$
$LK,"SYS_PCIBIOS_SERVICE_DIR",A="FL:::/Kernel/PCIBIOS.HC,4"$
$LK,"tS",A="FL:::/Kernel/KMisc.HC,122",BI=183$
$LK,"LBEqu",A="FL:::/Kernel/KernelB.HH,34"$
$LK,"ICF_RES_NOT_USED",A="FL:::/Kernel/KernelA.HH,1611"$
$LK,"DOCEt_SEL",A="FL:::/Kernel/KernelA.HH,960"$
$LK,"ArcDetermineCompressionType",A="FL:::/Kernel/Compress.HC,102",BI=184$
@ -1498,7 +1496,6 @@ $LK,"FirstDayOfMon",A="FL:::/Kernel/KDate.HC,71",BI=317$
$LK,"counts",A="FL:::/Kernel/KGlobals.HC,21"$
$LK,"PutChars",A="FL:::/Kernel/KeyDev.HC,20",BI=318$
$LK,"ZenithErr",A="FL:::/Kernel/Job.HC,433",BI=319$
$LK,"_BEQU",A="FL:::/Kernel/KUtils.HC,89"$
$LK,"DOCEf_RAW_TYPE",A="FL:::/Kernel/KernelA.HH,1069"$
$LK,"DOCEF_RAW_TYPE",A="FL:::/Kernel/KernelA.HH,981"$
$LK,"DriveFATBlkClean",A="FL:::/Kernel/BlkDev/DiskDrive.HC,99",BI=320$
@ -1545,6 +1542,7 @@ $LK,"VM_VIRTUALBOX",A="FL:::/Kernel/KernelA.HH,3893"$
$LK,"SCF_NEW_KEY",A="FL:::/Kernel/KernelA.HH,3486"$
$LK,"CCompCtrl",A="FL:::/Kernel/KernelA.HH,2179"$
$LK,"TASK_CONTEXT_SAVE",A="FL:::/Kernel/Sched.HC,56"$
$LK,"LBEqual",A="FL:::/Kernel/KernelB.HH,34"$
$LK,"SCf_NEW_KEY",A="FL:::/Kernel/KernelA.HH,3471"$
$LK,"CDirContext",A="FL:::/Kernel/KernelA.HH,2747"$
$LK,"BootDVDProbeAll",A="FL:::/Kernel/BlkDev/DiskATAId.HC,29",BI=331$
@ -2233,6 +2231,7 @@ $LK,"SCf_NO_SHIFT",A="FL:::/Kernel/KernelA.HH,3476"$
$LK,"ARGT_MOFFS32",A="FL:::/Kernel/KernelA.HH,1926"$
$LK,"ARGT_MOFFS16",A="FL:::/Kernel/KernelA.HH,1925"$
$LK,"WIG_TASK_DEFAULT",A="FL:::/Kernel/KernelA.HH,1444"$
$LK,"BEqual",A="FL:::/Kernel/KernelB.HH,28"$
$LK,"PRTF_LEFT_JUSTIFY",A="FL:::/Kernel/KernelA.HH,3870"$
$LK,"FUF_SINGLE",A="FL:::/Kernel/KernelA.HH,2576"$
$LK,"FUf_SINGLE",A="FL:::/Kernel/KernelA.HH,2548"$
@ -2666,6 +2665,7 @@ $LK,"IRQ_TIMER",A="FL:::/Kernel/KInts.HC,16"$
$LK,"DOC_COLOR_TREE",A="FL:::/Kernel/KernelA.HH,1144"$
$LK,"DOCEf_HAS_BIN",A="FL:::/Kernel/KernelA.HH,1067"$
$LK,"DOCEF_HAS_BIN",A="FL:::/Kernel/KernelA.HH,979"$
$LK,"_LBEQUAL",A="FL:::/Kernel/KUtils.HC,104"$
$LK,"VGAP_CRTC_INDEX",A="FL:::/Kernel/KernelA.HH,3677"$
$LK,"KbdMouseInit",A="FL:::/Kernel/SerialDev/Mouse.HC,348",BI=571$
$LK,"ATTRF_SEL",A="FL:::/Kernel/KernelA.HH,896"$

View File

@ -47,9 +47,9 @@ extern class CTask;
#define F64_MAX (0x7FEFFFFFFFFFFFFF(F64))
#define F64_MIN (0xFFEFFFFFFFFFFFFF(F64))
#define inf (0x7FF0000000000000(F64))
#define <EFBFBD> (0x7FF0000000000000(F64))
#define ì (0x7FF0000000000000(F64))
#define pi (0x400921FB54442D18(F64))
#define <EFBFBD> (0x400921FB54442D18(F64))
#define ã (0x400921FB54442D18(F64))
#define exp_1 (0x4005BF0A8B145769(F64)) //The number "e"
#define log2_10 (0x400A934F0979A371(F64))
#define log2_e (0x3FF71547652B82FE(F64))
@ -1553,7 +1553,7 @@ public class CAutoCompleteDictGlobals
#define OPTf_KEEP_PRIVATE 0x21
#define OPTf_NO_REG_VAR 0x22 //Applied to funs, not statements
#define OPTf_GLBLS_ON_DATA_HEAP 0x23
//Disable 10-byte float consts for <EFBFBD>,log2_10,log10_2,loge_2
//Disable 10-byte float consts for ã,log2_10,log10_2,loge_2
#define OPTf_NO_BUILTIN_CONST 0x24 //Applied to funs, not statements
#define OPTf_USE_IMM64 0x25 //Not completely implemented

View File

@ -24,13 +24,13 @@ public _intern IC_LBTR Bool LBtr(
U8 *bit_field,I64 bit); //Locked bit test and reset to zero.
public _intern IC_LBTS Bool LBts(
U8 *bit_field,I64 bit); //Locked bit test and set to one.
public _extern _BEQU Bool BEqu(
public _extern _BEQUAL Bool BEqual(
U8 *bit_field,I64 bit,Bool val);//Set bit equ to val.
public _extern _BIT_FIELD_EXT_U32 U32 BFieldExtU32(
U8 *bit_field,I64 bit,I64 size); //Extract U32 from bit field.
public _extern _BIT_FIELD_OR_U32 U0 BFieldOrU32(
U8 *bit_field,I64 bit,U32 pattern); //Or U32 into bit field.
public _extern _LBEQU Bool LBEqu(
public _extern _LBEQUAL Bool LBEqual(
U8 *bit_field,I64 bit,Bool val); //Locked Set bit equ to val.
#help_index "Boot"

View File

@ -474,8 +474,8 @@ public extern I64 PopUp(U8 *buf,CTask *parent=NULL,CTask **_pu_task=NULL);
public extern I64 PopUpPrint(U8 *format,...);
#help_index "Job/Exe;Task/Job/Exe;MultiCore"
public extern I64 JobResGet(CJob *rqst=NULL);
public extern Bool JobResScan(CJob *rqst=NULL,I64 *_res=NULL);
public extern I64 JobResGet(CJob *request=NULL);
public extern Bool JobResScan(CJob *request=NULL,I64 *_res=NULL);
#help_index "Job/Text & Messages;Task/Job/Text & Messages"
public extern CJob *TaskText(CTask *srv,CTask *master,U8 *data,I64 flags);

View File

@ -194,7 +194,7 @@ U0 CtrlAltCBSet(U8 ch,U0 (*fp_handler)(I64 sc),
else
keydev.ctrl_alt_shift_descs[ch]=NULL;
BEqu(&keydev.ctrl_alt_in_irq_flags,ch,in_irq);
BEqual(&keydev.ctrl_alt_in_irq_flags,ch,in_irq);
}
}

View File

@ -70,7 +70,7 @@ USE64
U0 TSSBusy(I64 tr,Bool val=OFF)
{//See $LK,"::/Demo/Lectures/Ring3.HC"$.
LBEqu((&sys_gdt)(U8 *)+tr+4,9,val);
LBEqual((&sys_gdt)(U8 *)+tr+4,9,val);
}
CTSS *TSSNew(I64 cpu_num)

View File

@ -52,9 +52,9 @@ U0 KbdCmdFlush()
U0 KbdLEDsSet(I64 sc)
{
U8 v=0;
BEqu(&v,0,Bt(&sc,SCf_SCROLL));
BEqu(&v,1,Bt(&sc,SCf_NUM));
BEqu(&v,2,Bt(&sc,SCf_CAPS));
BEqual(&v,0,Bt(&sc,SCf_SCROLL));
BEqual(&v,1,Bt(&sc,SCf_NUM));
BEqual(&v,2,Bt(&sc,SCf_CAPS));
try {
KbdCmdSend(KBD_PORT,0xED);
KbdCmdSend(KBD_PORT,v);
@ -308,8 +308,8 @@ U0 KbdBuildSC(U8 raw_byte,Bool in_irq,U8 *_last_raw_byte,I64 *_last_sc)
return;
}
sc=raw_byte;
BEqu(&sc,SCf_E0_PREFIX,*_last_raw_byte==0xE0);
BEqu(&sc,SCf_KEY_UP,raw_byte & 0x80);
BEqual(&sc,SCf_E0_PREFIX,*_last_raw_byte==0xE0);
BEqual(&sc,SCf_KEY_UP,raw_byte & 0x80);
*_last_raw_byte=raw_byte;
sc_flags=_last_sc->u32[0]&~0x1FF;

View File

@ -6,7 +6,7 @@ U0 InputFilterTask()
Fs->win_inhibit=WIG_USER_TASK_DEFAULT;
LBts(&Fs->task_flags,TASKf_INPUT_FILTER_TASK);
old_filter=LBts(&Fs->last_input_filter_task->task_flags,TASKf_FILTER_INPUT);
LBEqu(&Fs->task_flags,TASKf_FILTER_INPUT,old_filter);
LBEqual(&Fs->task_flags,TASKf_FILTER_INPUT,old_filter);
while (TRUE) {
CLI
JobsHandler(old_flags);

View File

@ -35,8 +35,8 @@ U0 MouseUpdate(I64 x,I64 y,I64 z,Bool l,Bool r)
}
mouse.lb=l;
mouse.rb=r;
LBEqu(&kbd.scan_code,SCf_MS_L_DOWN,mouse.lb);
LBEqu(&kbd.scan_code,SCf_MS_R_DOWN,mouse.rb);
LBEqual(&kbd.scan_code,SCf_MS_L_DOWN,mouse.lb);
LBEqual(&kbd.scan_code,SCf_MS_R_DOWN,mouse.rb);
}
U0 MouseSet(I64 x=I64_MAX,I64 y=I64_MAX,I64 z=I64_MAX,I64 l=I64_MAX,I64 r=I64_MAX)

View File

@ -50,7 +50,7 @@ U0 RevealPopUpHelp(I64 scf)
Sound;
Sleep(1);
}
LBEqu(&Fs->win_inhibit,WIf_SELF_KEY_DESC,old_key_desc);
LBEqual(&Fs->win_inhibit,WIf_SELF_KEY_DESC,old_key_desc);
Sound;
} while (tS-t0<1.0);
}

Binary file not shown.

View File

@ -51,7 +51,7 @@ public U0 EdCursorLeft(CDoc *doc,I64 sc=I64_MIN)
cc=doc_ce->min_col;
}
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
} else {
cc=doc_ce->min_col;
while (doc_ce->last!=doc &&
@ -60,7 +60,7 @@ public U0 EdCursorLeft(CDoc *doc,I64 sc=I64_MIN)
doc_ce->last->de_flags&(DOCEF_SKIP|DOCEF_FILTER_SKIP))) {
doc_ce=doc_ce->last;
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
}
if (doc_ce->last!=doc) {
doc_ce=doc_ce->last;
@ -78,7 +78,7 @@ public U0 EdCursorLeft(CDoc *doc,I64 sc=I64_MIN)
} else
cc=doc_ce->max_col;
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
}
}
}
@ -123,7 +123,7 @@ public U0 EdCursorRight(CDoc *doc,I64 sc=I64_MIN)
old_de_flags=doc_ce->de_flags;
old_color=doc_ce->type;
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
if (IsEditableText(doc_ce) && cc<doc_ce->max_col) {
dst=doc_ce->tag+cc;
doc_ne=DocEntryNewTag(doc,doc_ce,dst);
@ -141,17 +141,17 @@ public U0 EdCursorRight(CDoc *doc,I64 sc=I64_MIN)
} else {
if (doc_ce!=doc) {
if (cc<=doc_ce->min_col && sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc_ce->next;
while (doc_ce!=doc && doc_ce->de_flags&(DOCEF_SKIP|DOCEF_FILTER_SKIP)) {
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc_ce->next;
}
cc=doc_ce->min_col;
if (doc_ce->type_u8==DOCT_SOFT_NEW_LINE) {
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc_ce->next;
cc=doc_ce->min_col;
}
@ -198,7 +198,7 @@ public U0 EdLineUp(CDoc *doc,I64 sc=I64_MIN)
} else if (doc_ce->last!=doc)
doc_ce=doc_ce->last;
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc->cur_entry=doc_ce;
DocFormBwd(doc);
doc_ce=doc->cur_entry;
@ -206,14 +206,14 @@ public U0 EdLineUp(CDoc *doc,I64 sc=I64_MIN)
doc_ce->de_flags & (DOCEF_SKIP|DOCEF_FILTER_SKIP))) {
doc_ce=doc_ce->last;
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
}
y=doc_ce->y;
doc->y=y;
while (doc_ce!=doc && (doc_ce->y>=y && doc_ce->x>=x ||
doc_ce->de_flags & (DOCEF_SKIP|DOCEF_FILTER_SKIP))) {
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc_ce->last;
}
@ -222,7 +222,7 @@ public U0 EdLineUp(CDoc *doc,I64 sc=I64_MIN)
else {
if (!IsEditableText(doc_ce)) {
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
} else {
if (doc_ce->next->x==x) {
doc_ce=doc_ce->next;
@ -345,7 +345,7 @@ public U0 EdLineDown(CDoc *doc,I64 sc=I64_MIN)
doc_ce2->de_flags & (DOCEF_SKIP|DOCEF_FILTER_SKIP) ||
doc_ce2->x==x && !doc_ce2->max_col &&
Bt(doldoc.type_flags_nontag_invis,doc_ce2->type_u8)) && sc>=0)
BEqu(&doc_ce2->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce2->type,DOCEt_SEL,sc&SCF_SHIFT);
if (doc_ce2==doc_ce) break;
doc_ce2=doc_ce2->next;
}
@ -377,7 +377,7 @@ public U0 EdLineDown(CDoc *doc,I64 sc=I64_MIN)
if (!(doc->flags & DOCF_FORM))
while (doc_ce!=doc && doc_ce!=doc->cur_entry) {
if (sc>=0)
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc_ce->next;
}
doc->x=doc->cur_entry->x+doc->cur_col;

View File

@ -172,7 +172,7 @@ public U0 EdSelAll(CDoc *doc,Bool sel)
Bool unlock=DocLock(doc);
CDocEntry *doc_e=doc->head.next;
while (doc_e!=doc) {
BEqu(&doc_e->type,DOCEt_SEL,sel);
BEqual(&doc_e->type,DOCEt_SEL,sel);
doc_e=doc_e->next;
}
if (unlock)

View File

@ -324,7 +324,7 @@ dm_restart:
Fs->catch_except=TRUE;
}
}
LBEqu(&Fs->task_flags,TASKf_BREAK_TO_SHIFT_ESC,old_break_shift_esc);
LBEqual(&Fs->task_flags,TASKf_BREAK_TO_SHIFT_ESC,old_break_shift_esc);
Fs->border_src=old_border_src;
Fs->task_end_cb=old_end_cb;
return res;

View File

@ -21,7 +21,7 @@ public I64 DocGetKey(I64 *_sc=NULL)
old_key_desc=LBtr(&Fs->win_inhibit,WIf_SELF_KEY_DESC);
do ch=GetKey(&sc,TRUE);
while (sc&SCF_KEY_DESC);
LBEqu(&Fs->win_inhibit,WIf_SELF_KEY_DESC,old_key_desc);
LBEqual(&Fs->win_inhibit,WIf_SELF_KEY_DESC,old_key_desc);
DocRecalc(DocPut);
cont=FALSE;

View File

@ -6,7 +6,7 @@ public Bool DocLock(CDoc *doc)
while (LBts(&doc->locked_flags,DOClf_LOCKED))
Yield;
if (doc->owning_task!=Fs)
LBEqu(&doc->flags,DOCf_BREAK_UNLOCKED,BreakLock(Fs));
LBEqual(&doc->flags,DOCf_BREAK_UNLOCKED,BreakLock(Fs));
doc->owning_task=Fs;
return TRUE;
} else

View File

@ -8,13 +8,13 @@ I64 ParseDocFlagSingle(CCompCtrl *cc,I64 *_de_flags,U32 *_type,Bool turn_on)
(tmph=HashFind(cc->cur_str,doldoc.hash,DHT_DOC_FLAG))) {
res=tmph->user_data0;
if (res<64) {
BEqu(_de_flags,res,turn_on);
BEqual(_de_flags,res,turn_on);
switch (res) {
case DOCEf_BLINK:
case DOCEf_INVERT:
case DOCEf_UNDERLINE:
case DOCEf_SEL:
BEqu(_type,res,turn_on);
BEqual(_type,res,turn_on);
break;
}
}
@ -573,7 +573,7 @@ U0 DocEntryToggle(CDoc *doc)
} else {
old_color_names=LBts(&doc->flags,DOCf_COLOR_NAMES);
st=Doc2PlainText(doc,doc_ce);
LBEqu(&doc->flags,DOCf_COLOR_NAMES,old_color_names);
LBEqual(&doc->flags,DOCf_COLOR_NAMES,old_color_names);
DocEntryDel(doc,doc_ce);
DocPrint(doc,"$$$$%$$Q$$$$",st);
}

View File

@ -63,7 +63,7 @@ public U0 DocPutKey(CDoc *doc,I64 ch=0,I64 sc=0)
KeyDescSet("Edit/GoTo Doc End");
} else {
while (doc_ce!=doc) {
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc->cur_entry=doc_ce->next;
}
doc->cur_col=doc_ce->min_col;
@ -94,7 +94,7 @@ public U0 DocPutKey(CDoc *doc,I64 ch=0,I64 sc=0)
} else {
if (doc_ce==doc) doc_ce=doc_ce->last;
while (doc_ce!=doc) {
BEqu(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
BEqual(&doc_ce->type,DOCEt_SEL,sc&SCF_SHIFT);
doc_ce=doc->cur_entry=doc_ce->last;
}
doc_ce=doc->cur_entry=doc->head.next;

View File

@ -1293,7 +1293,7 @@ rc_skip:
vss->pos=doc->top_line_num;
}
}
LBEqu(&doc->flags,DOCf_MORE,more);
LBEqual(&doc->flags,DOCf_MORE,more);
}
}
if (!same_win) {

View File

@ -137,21 +137,21 @@ public Bool DocCursor(Bool show=OFF,CDoc *doc=NULL)
{//Show or hide cursor.
if (!doc && !(doc=DocPut))
return FALSE;
return !LBEqu(&doc->flags,DOCf_HIDE_CURSOR,!show);
return !LBEqual(&doc->flags,DOCf_HIDE_CURSOR,!show);
}
public Bool DocHighlightCursor(Bool show=OFF,CDoc *doc=NULL)
{//Highlight or Don't highlight cursor.
if (!doc && !(doc=DocPut))
return FALSE;
return !LBEqu(&doc->flags,DOCf_DONT_HIGHLIGHT_CURSOR,!show);
return !LBEqual(&doc->flags,DOCf_DONT_HIGHLIGHT_CURSOR,!show);
}
public Bool DocScroll(Bool val=OFF,CDoc *doc=NULL)
{//Turn scroll bars OFF/ON.
if (!doc && !(doc=DocPut))
return FALSE;
return !LBEqu(&doc->flags,DOCf_NO_SCROLL_BARS,!val);
return !LBEqual(&doc->flags,DOCf_NO_SCROLL_BARS,!val);
}
public U0 DocCollapse(Bool collapse=TRUE,CDoc *doc=NULL)
@ -164,7 +164,7 @@ public U0 DocCollapse(Bool collapse=TRUE,CDoc *doc=NULL)
doc_e=doc->head.next;
while (doc_e!=doc) {
if (doc_e->de_flags&DOCEF_TREE)
BEqu(&doc_e->de_flags,DOCEf_CHECKED_COLLAPSED,collapse);
BEqual(&doc_e->de_flags,DOCEf_CHECKED_COLLAPSED,collapse);
doc_e=doc_e->next;
}
DocRecalc(doc);

View File

@ -563,7 +563,7 @@ I64 SpriteQueueSelAll(CSprite *head,Bool val=TRUE)
I64 res=0;
CSprite *tmpg=head->next;
while (tmpg!=head) {
BEqu(&tmpg->type,SPf_SEL,val);
BEqual(&tmpg->type,SPf_SEL,val);
res++;
tmpg=tmpg->next;
}

View File

@ -102,7 +102,7 @@ U0 SpriteSelAll(U8 *elems,Bool val)
{
CSprite *tmpg=elems-offset(CSprite.start);
while (tmpg->type&SPG_TYPE_MASK) {
BEqu(&tmpg->type,SPf_SEL,val);
BEqual(&tmpg->type,SPf_SEL,val);
tmpg(U8 *)+=SpriteElemSize(tmpg);
}
}

View File

@ -12,7 +12,7 @@ CSprite *SpriteSideBar2SpriteQueue(CDoc *doc,CSprite *head,I64 *_cur_elem_num)
tmpg=SpriteSetSettings(,head,doc_e->left_exp);
if (tmpg!=head) {
tmpg=MAllocIdent(tmpg);
BEqu(&tmpg->type,SPf_SEL,Bt(&doc_e->type,DOCEt_SEL));
BEqual(&tmpg->type,SPf_SEL,Bt(&doc_e->type,DOCEt_SEL));
if (*_cur_elem_num==doc_e->left_exp) {
*_cur_elem_num=num;
found=TRUE;
@ -47,8 +47,8 @@ U0 SpriteSideBarPickNew(CDoc *doc,CSprite *head,I64 old_num)
DocPrint(doc,"$$LTRED$$$$MU-UL,\"%$$Q\",LE=%d$$\n",st,cur_elem_num++);
else
doc_e=DocPrint(doc,"$$LTBLUE$$$$MU-UL,\"%$$Q\",LE=%d$$\n",st,cur_elem_num++);
BEqu(&doc_e->de_flags,DOCEf_SEL,Bt(&tmpg->type,&SPf_SEL));
BEqu(&doc_e->type,DOCEt_SEL,Bt(&tmpg->type,SPf_SEL));
BEqual(&doc_e->de_flags,DOCEf_SEL,Bt(&tmpg->type,&SPf_SEL));
BEqual(&doc_e->type,DOCEt_SEL,Bt(&tmpg->type,SPf_SEL));
Free(st);
tmpg=tmpg->next;
}

View File

@ -64,9 +64,9 @@ U0 SettingsPop2(CTask *task,CTaskSettings *tmpse)
CDoc *doc;
if (doc=DocPut(task)) {
LBEqu(&doc->flags,DOCf_HIDE_CURSOR,!tmpse->hide_cursor);
LBEqu(&doc->flags,DOCf_DONT_HIGHLIGHT_CURSOR,!tmpse->highlight_cursor);
LBEqu(&doc->flags,DOCf_NO_SCROLL_BARS,!tmpse->scroll);
LBEqual(&doc->flags,DOCf_HIDE_CURSOR,!tmpse->hide_cursor);
LBEqual(&doc->flags,DOCf_DONT_HIGHLIGHT_CURSOR,!tmpse->highlight_cursor);
LBEqual(&doc->flags,DOCf_NO_SCROLL_BARS,!tmpse->scroll);
}
WinBorder(tmpse->border,task);

View File

@ -153,7 +153,7 @@ public U0 KeyMap(CTask *task=NULL)
KeyMapFamily(task,SCF_CTRL,TRUE,TRUE);
KeyMapFamily(task,SCF_ALT,TRUE,TRUE);
KeyMapCtrlAltFamily(TRUE,TRUE);
LBEqu(&task->win_inhibit,WIf_SELF_KEY_DESC,old_key_desc);
LBEqual(&task->win_inhibit,WIf_SELF_KEY_DESC,old_key_desc);
"\nKeyMap Completed.\n";
}

View File

@ -167,7 +167,7 @@ before or after "dd" are label characters.
if (fuf_flags&~(FUG_FILES_FIND|FUF_IGNORE|FUF_ALL|
FUF_WHOLE_LABELS|FUF_WHOLE_LABELS_BEFORE|FUF_WHOLE_LABELS_AFTER))
throw('FUF');
LBEqu(&fuf_flags,FUf_REPLACE,replace_text);
LBEqual(&fuf_flags,FUf_REPLACE,replace_text);
tmpde=tmpde1=FilesFind(files_find_mask,fuf_flags&FUG_FILES_FIND);
fuf_flags&=FUF_ALL|FUF_REPLACE|FUF_IGNORE|FUF_WHOLE_LABELS|
FUF_WHOLE_LABELS_BEFORE|FUF_WHOLE_LABELS_AFTER;

View File

@ -27,8 +27,8 @@ public U0 Refresh(I64 count=1,Bool force=FALSE)
Sleep(1);
}
if (old_doc)
LBEqu(&old_doc->flags,DOCf_DO_FULL_REFRESH,old_full_refresh);
LBEqu(&Fs->task_flags,TASKf_IDLE,old_idle);
LBEqual(&old_doc->flags,DOCf_DO_FULL_REFRESH,old_full_refresh);
LBEqual(&Fs->task_flags,TASKf_IDLE,old_idle);
}
#help_index "Windows"

View File

@ -56,7 +56,7 @@ public Bool ODEPause(CMathODE *ode,Bool val=ON)
{//Pause ODE.
Bool res;
if (!ode) return OFF;
res=LBEqu(&ode->flags,ODEf_PAUSED,val);
res=LBEqual(&ode->flags,ODEf_PAUSED,val);
if (val)
while (Bt(&ode->flags,ODEf_BUSY))
Yield;