Fix some tests + add one

Author: kocsismate

Zend/tests/clone_initializer/clone_initializer_success16.phpt

@@ -0,0 +1,53 @@
+--TEST--
+Test that using "clone with" with deep cloned properties will result in the property to be cloned twice
+--FILE--
+<?php
+
+class Bar
+{
+    public function __construct(
+        private readonly int $baz
+    ) {
+    }
+
+    public function __clone(): void
+    {
+        echo "Cloning Bar\n";
+    }
+}
+
+class Foo
+{
+    public function __construct(
+        public readonly Bar $bar
+    ) {}
+
+    public function __clone(): void
+    {
+        echo "Cloning Foo\n";
+        $this->bar = clone $this->bar;
+    }
+
+    public function withBar(): static
+    {
+        return clone $this with [
+            "bar" => new Bar(2),
+        ];
+    }
+}
+
+$foo = new Foo(new Bar(1));
+
+var_dump($foo->withBar());
+
+?>
+--EXPECTF--
+Cloning Foo
+Cloning Bar
+object(Foo)#3 (1) {
+  ["bar"]=>
+  object(Bar)#5 (1) {
+    ["baz":"Bar":private]=>
+    int(2)
+  }
+}

Zend/zend_object_handlers.c

@@ -825,7 +825,10 @@ ZEND_API zval *zend_std_write_property(zend_object *zobj, zend_string *name, zva
 				bool is_clone_with_op = false;
 
 				if (UNEXPECTED(is_readonly)) {
-					is_clone_with_op = EG(current_execute_data) && EG(current_execute_data)->opline &&
+					is_clone_with_op = EG(current_execute_data) &&
+						EG(current_execute_data)->func &&
+						ZEND_USER_CODE(EG(current_execute_data)->func->common.type) &&
+						EG(current_execute_data)->opline &&
 						EG(current_execute_data)->opline->opcode == ZEND_CLONE_INIT_PROP;
 
 					if (UNEXPECTED(