Implements setting table values

tests/integration/UserData.cpp

@@ -44,5 +44,22 @@ end
     delete script;
 }
 
+TEST_CASE( "Sets UserData value", "[integration]" ) {
+    UserDataStorage::RegisterType(HashedString::ConstHash("testObject"), UserDataTestObject::CreateData());
+    Script* script = Script::Create(R"(
+function testFunc(testObject obj)
+    obj["foo"] = 5000
+end
+)");
+    REQUIRE(!script->Diagnostics -> HasErrors());
+    script->Evaluate();
+    auto obj = new UserDataTestObject();
+    auto parameter = new UserDataValue(HashedString::ConstHash("testObject"), obj);
+    script->CallFunction("testFunc", {parameter});
+    REQUIRE(obj->foo == 5000);
+    delete script;
+}
+
+
 
 #endif