Исправлена ошибка с тем что в фоновых заданиях не срабатывали подписки на события

Author: sfaqer

src/OneScript.StandardLibrary/Tasks/BackgroundTasksManager.cs

@@ -47,10 +47,13 @@ public BackgroundTask Execute(IRuntimeContextInstance target, string methodName,
             var task = new BackgroundTask(target, methodName, parameters);
             _tasks.Add(task);
 
+            var eventProcessor = MachineInstance.Current.EventProcessor;
+
             var taskCreationOptions = longRunning ? TaskCreationOptions.LongRunning : TaskCreationOptions.None;
             var worker = new Task(() =>
             {
                 MachineInstance.Current.SetMemory(_runtimeContext);
+                MachineInstance.Current.EventProcessor = eventProcessor;
                 var debugger = _runtimeContext.Services.TryResolve<IDebugController>();
                 debugger?.AttachToThread();
                 try

tests/tasks.os

@@ -3,6 +3,8 @@
 Перем глБлокировка;
 Перем глСумма;
 
+Перем СобытиеВызвано;
+
 ////////////////////////////////////////////////////////////////////
 // Программный интерфейс
 
@@ -22,6 +24,7 @@
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоВозвращаетсяРезультатДелегата");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоРаботаетБлокировка");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоКодМожетОпределитьИДЗадания");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоОбработчикиСобытийВызываютсяВФоновомЗадании");
 
 	Возврат ВсеТесты;
 
@@ -68,8 +71,12 @@
 
 КонецПроцедуры
 
+Процедура Событие() Экспорт
+	СобытиеВызвано = Истина;
+КонецПроцедуры
+
 Процедура ТестДолжен_ПроверитьСозданиеЗаданий() Экспорт
-	
+
 	Задание = ФоновыеЗадания.Выполнить(ЭтотОбъект, "ПроцедураБезПараметров");
 	юТест.ПроверитьИстину(ЗначениеЗаполнено(Задание.УникальныйИдентификатор));
 	юТест.ПроверитьРавенство("ПроцедураБезПараметров", Задание.ИмяМетода);
@@ -263,3 +270,25 @@
 	юТест.ПроверитьРавенство(Неопределено, ЗаданиеГлавногоПотока);
 
 КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьЧтоОбработчикиСобытийВызываютсяВФоновомЗадании() Экспорт
+
+	СобытиеВызвано = Ложь;
+
+	Параметры = Новый Массив;
+	Параметры.Добавить("ЯСобытие");
+	Параметры.Добавить(Новый Массив);
+
+	ДобавитьОбработчик ЭтотОбъект.ЯСобытие, Событие;
+
+	ФоновоеЗадание = ФоновыеЗадания.Выполнить(ЭтотОбъект, "ВызватьСобытие", Параметры);
+	ФоновоеЗадание.ОжидатьЗавершения();
+
+	УдалитьОбработчик ЭтотОбъект.ЯСобытие, Событие;
+
+	юТест.ПроверитьИстину(
+		СобытиеВызвано,
+		"Ожидали что при вызове события в фоновом задании вызовется, а это не так"
+	);
+
+КонецПроцедуры