Add a way to use a custom target in Script::start()

Author: adazem009

include/scratchcpp/script.h

@@ -36,6 +36,7 @@ class LIBSCRATCHCPP_EXPORT Script
         void setLists(const std::vector<List *> &lists);
 
         std::shared_ptr<VirtualMachine> start();
+        std::shared_ptr<VirtualMachine> start(Target *target);
 
     private:
         spimpl::unique_impl_ptr<ScriptPrivate> impl;

src/engine/script.cpp

@@ -35,7 +35,13 @@ void Script::setBytecode(const std::vector<unsigned int> &code)
 /*! Starts the script (creates a virtual machine). */
 std::shared_ptr<VirtualMachine> Script::start()
 {
-    auto vm = std::make_shared<VirtualMachine>(impl->target, impl->engine, this);
+    return start(impl->target);
+}
+
+/*! Starts the script (creates a virtual machine). */
+std::shared_ptr<VirtualMachine> Script::start(Target *target)
+{
+    auto vm = std::make_shared<VirtualMachine>(target, impl->engine, this);
     vm->setBytecode(impl->bytecode);
     vm->setProcedures(impl->procedures);
     vm->setFunctions(impl->functions);

test/script/script_test.cpp

@@ -81,4 +81,15 @@ TEST_F(ScriptTest, Start)
     ASSERT_EQ(vm->constValues()[0].toString(), constValues[0].toString());
     ASSERT_EQ(vm->variables()[0], variables[0]);
     ASSERT_EQ(vm->lists()[0], lists[0]);
+
+    Target target;
+    vm = script3.start(&target);
+    ASSERT_TRUE(vm);
+    ASSERT_EQ(vm->target(), &target);
+    ASSERT_EQ(vm->bytecode()[0], bytecode[0]);
+    ASSERT_EQ(vm->procedures()[0], procedures[0]);
+    ASSERT_EQ(vm->functions()[0], functions[0]);
+    ASSERT_EQ(vm->constValues()[0].toString(), constValues[0].toString());
+    ASSERT_EQ(vm->variables()[0], variables[0]);
+    ASSERT_EQ(vm->lists()[0], lists[0]);
 }