Function AssignReg

src/Chain/libraries/glua/glua_decompile.cpp:925–974

}

void AssignReg(GluaDecompileContextP ctx, Function* F, int reg, std::string src, int prio, int mayTest) {
	std::string dest = REGISTER(reg);
	std::string nsrc;

	if (PENDING(reg)) {
		if (ctx->guess_locals) {
			ctx->errortmp = std::string("Overwrote pending register: R") + std::to_string(reg) + " in 'AssignReg'";
			SET_ERROR(ctx, F, ctx->errortmp);
		}
		else {
			ctx->errortmp = std::string("Overwrote pending register: R") + std::to_string(reg) + " in 'AssignReg'. Creating missing local";
			SET_ERROR(ctx, F, ctx->errortmp);
			DeclareLocal(ctx, F, reg, dest);
		}
		return;
	}

	PENDING(reg) = 1;
	CALL(reg) = 0;
	F->Rprio[reg] = prio;

	if (ctx->debug) {
		printf("SET_SIZE(tpend) = %d \n", SET_SIZE(F->tpend));
	}

	nsrc = std::string(src);
	if (F->testpending == reg + 1 && mayTest && F->testjump == F->pc + 2) {
		int thenaddr, endif;
		std::string test = OutputBoolean(ctx, F, &thenaddr, &endif, 1);
		if (ctx->error.length()>0) {
			return;
		}
		if (endif >= F->pc) {
			std::stringstream str;
			str << test << " or " << src;
			nsrc = str.str();
			F->testpending = 0;
			F->Rprio[reg] = 8;
		}
	}
	F->testjump = 0;

	if (!IS_VARIABLE(reg)) {
		REGISTER(reg) = nsrc;
		AddToSet(F->tpend, reg);
	}
	else {
		AddToVarList(&(F->vpend), dest, nsrc, reg);
	}
}

/*
** Table Functions