Function MakeIndex

src/Chain/libraries/glua/glua_decompile.cpp:1615–1659

** type: DOT, SELF, TABLE, SQUARE_BRACKET ** input and output ** rstr "a" " a" "or" a a+2 ** SELF :a ERROR ERROR ERROR ERROR ** DOT .a [" a"] ["or"] [a] [a+2] ** TABLE a [" a"] ["or"] [a] [a+2] ** SB ["a"] [" a"] ["or"] [a] [a+2] */

** SB    ["a"] [" a"]  ["or"]  [a]     [a+2]
*/
IndexType MakeIndex(GluaDecompileContextP ctx, Function* F, std::stringstream &str, std::string rstr, IndexType type) {
	int ret;
	int len = (int) rstr.length();
	if (type == SQUARE_BRACKET) {
		str << "[" << rstr << "]";
		return SQUARE_BRACKET;
	}
	/*
	* see if index can be expressed without quotes
	*/
	if (rstr[0] == '\"' && rstr[len - 1] == '\"') {
		rstr[len - 1] = '\0';
		if (isIdentifier((rstr.c_str() + 1))) {
			switch (type) {
			case SELF:
				str << ":" << (rstr.c_str() + 1);
				ret = SELF;
				break;
			case DOT:
				str << "." << (rstr.c_str() + 1);
				ret = DOT;
				break;
			case TABLE:
				str << (rstr.c_str() + 1);
				ret = TABLE;
				break;
			}
			rstr[len - 1] = '\"';
			return (IndexType_) ret;
		}
		rstr[len - 1] = '\"';
	}

	if (type != SELF) {
		str << "[" << rstr << "]";
		return SQUARE_BRACKET;
	}
	else {
		std::string errorbuff;
		str << ":[" << rstr << "]";
		errorbuff = "[" + rstr + "] should be a SELF Operator";
		SET_ERROR(ctx, F, errorbuff);
		return SQUARE_BRACKET;
	}
}

void ShowState(GluaDecompileContextP ctx, Function* F) {
	int i;