Function MakeBoolean

src/Chain/libraries/glua/glua_decompile.cpp:530–742

}

LogicExp* MakeBoolean(GluaDecompileContextP ctx, Function* F, int* thenaddr, int* endif) {
	int i;
	int firstaddr, elseaddr;
	BoolOp *first, *realLast, *last, *tmpLast, *curr;
	int lastCount;
	LogicExp *currExp = nullptr, *firstExp = nullptr;
	int dest;

	if (endif) {
		*endif = 0;
	}

	if (F->bools.size == 0) {
		SET_ERROR(ctx, F, "Attempted to build a boolean expression without a pending context");
		return nullptr;
	}

	first = (BoolOp*)FirstItem(&(F->bools));
	realLast = (BoolOp*)LastItem(&(F->bools));
	last = realLast;
	firstaddr = first->pc + 2;
	*thenaddr = last->pc + 2;
	elseaddr = last->dest;

	for (curr = realLast; curr; curr = lua_cast(BoolOp*, curr->super.prev)) {
		int dest = curr->dest;
		if ((elseaddr > *thenaddr) &&
			(((curr->op == OP_TEST) || (curr->op == OP_TESTSET)) ? (dest > elseaddr + 1) :
			(dest > elseaddr))) {
			last = curr;
			*thenaddr = curr->pc + 2;
			elseaddr = dest;
		}
	}

	tmpLast = last;
	for (curr = first; curr && curr != tmpLast; curr = lua_cast(BoolOp*, curr->super.next)) {
		int dest = curr->dest;
		if (elseaddr > firstaddr) {
			if (dest < firstaddr) {
				last = curr;
				*thenaddr = curr->pc + 2;
				elseaddr = dest;
			}
		}
		else {
			if (dest == firstaddr) {
				last = curr;
				*thenaddr = curr->pc + 2;
				elseaddr = dest;
			}
			else {
				break;
			}
		}
	}

	dest = first->dest;