Merge pull request #17 from asosnoviy/main

Подгон тестов под oneunit

Author: Stivo182

tests/HttpBin_API_test.os

@@ -9,6 +9,12 @@
 Перем HttpBin; // HttpBin
 Перем СервисЗапущен;
 
+&ТестовыйНабор(Характер = "Одиночка")
+Процедура ПриСозданииОбъекта()
+
+КонецПроцедуры
+
+&ПередВсеми
 Процедура ПередЗапускомТестов() Экспорт
 
 	СервисЗапущен = Ложь;
@@ -22,10 +28,12 @@
 
 КонецПроцедуры
 
+&ПослеВсех
 Процедура ПослеЗапускаТестов() Экспорт
 	HttpBin.Остановить();
 КонецПроцедуры
 
+&ПередКаждым
 Процедура ПередЗапускомТеста() Экспорт
 	Если Не СервисЗапущен Тогда
 		ВызватьИсключение "Сервис не запущен";

tests/HttpBin_test.os

@@ -8,10 +8,17 @@
 Перем _HttpBin; // HttpBin
 Перем _ТекущийКаталог; // Строка
 
+&ТестовыйНабор(Характер = "Одиночка")
+Процедура ПриСозданииОбъекта()
+	
+КонецПроцедуры
+
+&ПередКаждым
 Процедура ПередЗапускомТеста() Экспорт
 	_ТекущийКаталог = ТекущийКаталог();
 КонецПроцедуры
 
+&ПослеКаждого
 Процедура ПослеЗапускаТеста() Экспорт
 
 	УстановитьТекущийКаталог(_ТекущийКаталог);