Add deep_copy script and tests

Author: KeeVeeGames

DeepCopy/DeepCopy.yyp

@@ -0,0 +1,34 @@
+var array = [
+    new Class1(),
+    [ [0], [1], [2] ],
+    { hmm : "hmm", huh : "huh", class : new Class2() }
+];
+
+var struct = new Class3(
+    new Class2(),
+    new Class4(
+        new Class4(
+            [0, 1, 2],
+            { three : 3, four : 4, five : 5 }
+        )
+    )
+);
+
+var new_araay = deep_copy(array);
+var new_struct = deep_copy(struct);
+
+// Both have identival values
+show_debug_message(array);
+show_debug_message(struct);
+show_debug_message(new_araay);
+show_debug_message(new_struct);
+
+// But not holding the same references
+show_debug_message(array == new_araay);                                             // false
+show_debug_message(array[0] == new_araay[0]);                                       // false
+show_debug_message(array[1] == new_araay[1]);                                       // false
+show_debug_message(array[2] == new_araay[2]);                                       // false
+show_debug_message(struct == new_struct);                                           // false
+show_debug_message(struct.thing == new_struct.thing);                               // false
+show_debug_message(struct.stuff == new_struct.stuff);                               // false
+show_debug_message(struct.stuff.thing == new_struct.stuff.thing);                   // false

DeepCopy/objects/obj_deep_copy_test/Create_0.gml

@@ -0,0 +1,49 @@
+/// @function                       deep_copy(ref)
+/// @param {T} ref                  Thing to deep copy
+/// @returns {T}                    New array, or new struct, or new instance of class, anything else (real / string / etc.) will be returned as-is
+/// @description                    Returns a deep recursive copy of the provided array / struct / constructed struct
+function deep_copy(ref) {
+    var ref_new;
+    
+    if (is_array(ref)) {
+        ref_new = array_create(array_length(ref));
+        
+        var length = array_length(ref_new);
+        
+        for (var i = 0; i < length; i++) {
+            ref_new[i] = deep_copy(ref[i]);
+        }
+        
+        return ref_new;
+    }
+    else if (is_struct(ref)) {
+        var base = instanceof(ref);
+        
+        switch (base) {
+            case "struct":
+            case "weakref":
+                ref_new = {};
+                break;
+                
+            default:
+                var constr = method(undefined, asset_get_index(base));
+                ref_new = new constr();
+        }
+        
+        var names = variable_struct_get_names(ref);
+        var length = variable_struct_names_count(ref);
+        
+        for (var i = 0; i < length; i++) {
+            var name = names[i];
+            
+            variable_struct_set(ref_new, name, deep_copy(variable_struct_get(ref, name)));
+        }
+        
+        return ref_new;
+    } else {
+        return ref;
+    }
+}
+
+// GMEdit hint
+/// @hint deep_copy(ref:T)->T Returns a deep recursive copy of the provided array / struct / constructed struct

DeepCopy/objects/obj_deep_copy_test/obj_deep_copy_test.yy

@@ -0,0 +1,26 @@
+function Class1() constructor {
+    static val = "hello!";
+    
+    static func = function() {
+        show_debug_message(val);
+    }
+}
+
+function Class2() : Class1() constructor {
+    a = 0;
+    b = 1;
+    c = 2;
+}
+
+function Class3(_thing, _stuff)constructor  {
+    thing = _thing;
+    stuff = _stuff;
+}
+
+function Class4(_thing) constructor {
+    thing = argument[0];
+    
+    if (argument_count > 1) {
+        stuff = argument[1];
+    }
+}