Method DebugWriteProperty

source/Debugger.cpp:1077–1138

}

void Object::DebugWriteProperty(IDebugProperties *aDebugger, int aPage, int aPageSize, int aDepth)
{
	auto enum_method = IsClassPrototype() ? nullptr : GetMethod(_T("__Enum"));
	int num_children = (int)mFields.Length() + (mBase != nullptr) + (enum_method != nullptr);

	DebugCookie cookie;
	aDebugger->BeginProperty(NULL, "object", num_children, cookie);

	if (aDepth)
	{
		int page_start = aPageSize * aPage, page_end = aPageSize * (aPage + 1);

		if (mBase)
		{
			// Since this object has a "base", let it count as the first field.
			if (page_start == 0) // i.e. this is the first page.
			{
				aDebugger->WriteBaseProperty(mBase);
				// Now fall through and retrieve field[0] (unless aPageSize == 1).
			}
			// So 20..39 becomes 19..38 when there's a base object:
			else --page_start;
			--page_end;
		}
		int field_count = (int)mFields.Length();
		int i = page_start, page_end_field = min(page_end, field_count);
		// For each field in the requested page...
		for ( ; i < page_end_field; ++i)
		{
			Object::FieldType &field = mFields[i];
			ExprTokenType value;
			if (field.symbol == SYM_DYNAMIC)
			{
				if (field.prop->MinParams > 0)
					continue;
				aDebugger->WriteDynamicProperty(field.name);
			}
			else
			{
				field.ToToken(value);
				aDebugger->WriteProperty(field.name, value);
			}
		}
		if (enum_method && i < page_end)
		{
			if (dynamic_cast<BuiltInMethod *>(enum_method))
			{
				// Built-in enumerators are always safe to call automatically.
				aDebugger->WriteEnumItems(this, i - field_count, page_end - field_count);
			}
			else
			{
				DebugCookie cookie;
				// Write an empty property; enumerate only on property_get.
				aDebugger->BeginProperty("<enum>", "object", 1, cookie);
				aDebugger->EndProperty(cookie);
			}
		}