Function GetBasicVariableInfo

SuperCalc.cpp:969–1005

std::vector<char*> externalBlocks;

const char* GetBasicVariableInfo(const ExternTypeInfo& type, char* ptr)
{
	static char val[256];

	switch(type.type)
	{
	case ExternTypeInfo::TYPE_CHAR:
		if(codeSymbols[type.offsetToName] == 'b')
		{
			safeprintf(val, 256, *(unsigned char*)ptr ? "true" : "false");
		}else{
			if(*(unsigned char*)ptr)
				safeprintf(val, 256, "'%c' (%d)", *(unsigned char*)ptr, (int)*(unsigned char*)ptr);
			else
				safeprintf(val, 256, "0");
		}
		break;
	case ExternTypeInfo::TYPE_SHORT:
		safeprintf(val, 256, "%d", *(short*)ptr);
		break;
	case ExternTypeInfo::TYPE_INT:
		safeprintf(val, 256, type.subType == 0 ? "%d" : "0x%x", *(int*)ptr);
		break;
	case ExternTypeInfo::TYPE_LONG:
		safeprintf(val, 256, "%lld", *(long long*)ptr);
		break;
	case ExternTypeInfo::TYPE_FLOAT:
		safeprintf(val, 256, "%f", *(float*)ptr);
		break;
	case ExternTypeInfo::TYPE_DOUBLE:
		safeprintf(val, 256, "%f", *(double*)ptr);
		break;
	default:
		safeprintf(val, 256, "not basic type");
	}
	return val;
}

void FillArrayVariableInfo(const ExternTypeInfo& type, char* ptr, HTREEITEM parent, bool update)
{