Serialiser_Engine: Deserialisation of nested lists

Serialiser_Engine/Compute/Deserialise.cs

@@ -53,7 +53,12 @@ private static object IDeserialise(this BsonValue bson, string version, bool isU
             if (bson.IsBsonNull)
                 return null;
             else if (bson.IsBsonArray)
-                return bson.DeserialiseList(new List<object>(), version, isUpgraded);
+            {
+                if (IsNestedList(bson))
+                    return bson.DeserialiseNestedList(new List<List<object>>(), version, isUpgraded);
+                else
+                    return bson.DeserialiseList(new List<object>(), version, isUpgraded);
+            }
             else if (bson.IsBsonDocument)
             {
                 BsonDocument doc = bson.AsBsonDocument;

Serialiser_Engine/Compute/Deserialise/List.cs

@@ -56,5 +56,39 @@ private static List<T> DeserialiseList<T>(this BsonValue bson, List<T> value, st
         }
 
         /*******************************************/
+
+        private static List<List<T>> DeserialiseNestedList<T>(this BsonValue bson, List<List<T>> value, string version, bool isUpgraded)
+        {
+            bson = ExtractValue(bson);
+
+            if (!bson.IsBsonArray)
+            {
+                BH.Engine.Base.Compute.RecordError("Expected to deserialise a List and received " + bson.ToString() + " instead.");
+                return value;
+            }
+
+            if (value == null)
+                value = new List<List<T>>();
+
+            foreach (BsonValue item in bson.AsBsonArray)
+                value.Add((List<T>)item.DeserialiseList(new List<T>(), version, isUpgraded));
+
+            return value;
+        }
+
+        /*******************************************/
+
+        private static bool IsNestedList(this BsonValue bson)
+        {
+            int nest = 0;
+
+            while(bson.IsBsonArray)
+            {
+                nest++;
+                bson = bson[0];
+            }
+
+            return nest > 1;
+        }
     }
 }