applyAlwaysRules - apply rules while there are changes [1008182]

13
LINES

< > BotCompany Repo | #1008182 // applyAlwaysRules - apply rules while there are changes

JavaX fragment (include)

static long applyAlwaysRules_defaultSteps = 1000;

static void applyAlwaysRules() {
  applyAlwaysRules(applyAlwaysRules_defaultSteps);
}

static void applyAlwaysRules(long maxSteps) {
  long count = 0, step = 0;
  do {
    count = lispChangeCount();
    applyAlwaysRules_step();
  } while (++step < maxSteps && lispChangeCount() != count);
}

download show line numbers debug dex old transpilations

Travelled to 13 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tslmcundralx, tvejysmllsmz, vouqrxazstgt

No comments. add comment

Snippet ID:	#1008182
Snippet name:	applyAlwaysRules - apply rules while there are changes
Eternal ID of this version:	#1008182/2
Text MD5:	40ca68bbdd8fc6888ea707a287061e57
Author:	stefan
Category:	javax / a.i.
Type:	JavaX fragment (include)
Public (visible to everyone):	Yes
Archived (hidden from active list):	No
Created/modified:	2017-04-30 17:36:38
Source code size:	353 bytes / 13 lines
Pitched / IR pitched:	No / No
Views / Downloads:	556 / 580
Version history:	1 change(s)
Referenced in:	[show references]

1	static long applyAlwaysRules_defaultSteps = 1000;
2
3	static void applyAlwaysRules() {
4	applyAlwaysRules(applyAlwaysRules_defaultSteps);
5	}
6
7	static void applyAlwaysRules(long maxSteps) {
8	long count = 0, step = 0;
9	do {
10	count = lispChangeCount();
11	applyAlwaysRules_step();
12	} while (++step < maxSteps && lispChangeCount() != count);
13	}