Implement control_start_as_clone

Author: adazem009

src/dev/blocks/controlblocks.cpp

@@ -37,6 +37,7 @@ void ControlBlocks::registerBlocks(IEngine *engine)
     engine->addCompileFunction(this, "control_repeat_until", &compileRepeatUntil);
     engine->addCompileFunction(this, "control_while", &compileWhile);
     engine->addCompileFunction(this, "control_for_each", &compileForEach);
+    engine->addCompileFunction(this, "control_start_as_clone", &compileStartAsClone);
 }
 
 CompilerValue *ControlBlocks::compileForever(Compiler *compiler)
@@ -136,6 +137,12 @@ CompilerValue *ControlBlocks::compileForEach(Compiler *compiler)
     return nullptr;
 }
 
+CompilerValue *ControlBlocks::compileStartAsClone(Compiler *compiler)
+{
+    compiler->engine()->addCloneInitScript(compiler->block());
+    return nullptr;
+}
+
 extern "C" void control_stop_all(ExecutionContext *ctx)
 {
     ctx->engine()->stop();

src/dev/blocks/controlblocks.h

@@ -26,6 +26,7 @@ class ControlBlocks : public IExtension
         static CompilerValue *compileRepeatUntil(Compiler *compiler);
         static CompilerValue *compileWhile(Compiler *compiler);
         static CompilerValue *compileForEach(Compiler *compiler);
+        static CompilerValue *compileStartAsClone(Compiler *compiler);
 };
 
 } // namespace libscratchcpp

test/dev/blocks/control_blocks_test.cpp

@@ -754,3 +754,16 @@ TEST_F(ControlBlocksTest, ForEach)
         ASSERT_GT(var1->value(), 0);
     }
 }
+
+TEST_F(ControlBlocksTest, StartAsClone)
+{
+    auto target = std::make_shared<Sprite>();
+    ScriptBuilder builder(m_extension.get(), m_engine, target);
+
+    builder.addBlock("control_start_as_clone");
+    auto block = builder.currentBlock();
+
+    Compiler compiler(&m_engineMock, target.get());
+    EXPECT_CALL(m_engineMock, addCloneInitScript(block));
+    compiler.compile(block);
+}