Безопасное сохранение коллекции

Author: nixel2007

src/Классы/ПотокСлужебный.os

@@ -6,7 +6,10 @@
 Перем Коллекция;
 
 Процедура УстановитьКоллекцию(НоваяКоллекция) Экспорт
-	Коллекция = НоваяКоллекция;
+	Коллекция = Новый Массив;
+	Для Каждого ЭлементНовойКоллекции Из НоваяКоллекция Цикл
+		Коллекция.Добавить(ЭлементНовойКоллекции);
+	КонецЦикла;
 КонецПроцедуры
 
 Функция ПолучитьКоллекцию() Экспорт

test.os

@@ -45,7 +45,7 @@
 	.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
 
 Массив = Новый Массив;
-Массив.Добавить(1);
+Массив.Добавить(4);
 Массив.Добавить(2);
 Массив.Добавить(2);
 Массив.Добавить(3);
@@ -63,3 +63,7 @@
 	.Сократить(ФункцияСокращения, 0);
 
 Сообщить(Результат);
+
+// Результат должен различаться
+Потоки.ИзКоллекции(Массив).Сортировать().Первые(1).ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
+Сообщить(Массив[0]);