Рефакторинг и исправления тестов.

packagedef

@@ -1,10 +1,12 @@
 
 Описание.Имя("asserts")
-		.Версия("1.4.0")
+		.Версия("1.4.1")
 		.ВерсияСреды("1.0.21")
 		.ВключитьФайл("src")
 		.ВключитьФайл("tests")
-		.ВключитьФайл("lib.config")
 		.ВключитьФайл("readme.md")
-                .РазработкаЗависитОт("1bdd")
-                .РазработкаЗависитОт("1testrunner")
+		.ОпределяетКласс("БДДАссерт", "src/Классы/БДДАссерт.os")
+		.ОпределяетМодуль("Ожидаем", "src/Модули/Ожидаем.os")
+		.ОпределяетМодуль("Утверждения", "src/Модули/Утверждения.os")
+        .РазработкаЗависитОт("1bdd")
+        .РазработкаЗависитОт("1testrunner")

src/bdd-asserts-class.os → src/Классы/БДДАссерт.os

@@ -16,7 +16,6 @@
 КонецФункции
 
 Процедура ПриСозданииОбъекта(Знач ПроверяемоеЗначениеПараметр, Знач Сообщение = "")
-
 	ПроверяемоеЗначение = ПроверяемоеЗначениеПараметр;
 	ДопСообщениеОшибки = Сообщение;
 	ФлагОтрицания = Ложь;

src/bdd-asserts.os → src/Модули/Ожидаем.os

@@ -1,5 +1,4 @@
-
-Функция Что(Знач ПроверяемоеЗначениеПараметр, Знач Сообщение = "") Экспорт
+Функция Что(Знач ПроверяемоеЗначениеПараметр, Знач Сообщение = "") Экспорт
 	БДДАссерт = Новый БДДАссерт(ПроверяемоеЗначениеПараметр, Сообщение);
 	Возврат БДДАссерт;
 КонецФункции

tests/bdd-assertions-tables-tests.os

@@ -1,85 +1,77 @@
-Перем ОбъектТеста;
-
-Функция ПолучитьСписокТестов(юТест) Экспорт
-	ВсеТесты = Новый Массив;
-	ВсеТесты.Добавить("ТестДолжен_Проверить_РавнаТаблице");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_Отрицание_РавнаТаблице");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетРавнуюСтруктуруСТаблицей");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетРавнуюСтруктуруСТаблицей_БезУчетаПорядкаКолонок");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_Отрицание_ИмеетРавнуюСтруктуруСТаблицей");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_НеравенствоТаблицСИзмененнымПорядкомСтрок");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_НеравенствоТаблицСИзмененнымПорядкомКолонок");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_СодержитСтрокуТаблицы");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_Отрицание_СодержитСтрокуТаблицы");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_РавнаТаблице_БезУчетаПорядкаСтрок");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_РавнаТаблице_БезУчетаПорядкаКолонок");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_РавнаТаблице_БезУчетаИменКолонок");
-
-	Возврат ВсеТесты;
-КонецФункции
-
+&Тест
 Процедура ТестДолжен_Проверить_РавнаТаблице() Экспорт
-	ОбъектТеста.Что(Таблица1()).РавнаТаблице(Таблица1());
+	Ожидаем.Что(Таблица1()).РавнаТаблице(Таблица1());
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_Отрицание_РавнаТаблице() Экспорт
-	ОбъектТеста.Что(Таблица1()).Не_().РавнаТаблице(Таблица2());
+	Ожидаем.Что(Таблица1()).Не_().РавнаТаблице(Таблица2());
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетРавнуюСтруктуруСТаблицей() Экспорт
 	Таблица2 = Таблица1();
 	Таблица2.Удалить(0);
-	ОбъектТеста.Что(Таблица1()).ИмеетРавнуюСтруктуруСТаблицей(Таблица2);
+	Ожидаем.Что(Таблица1()).ИмеетРавнуюСтруктуруСТаблицей(Таблица2);
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетРавнуюСтруктуруСТаблицей_БезУчетаПорядкаКолонок() Экспорт
-	ОбъектТеста.Что(Таблица1()).БезУчетаПорядКаКолонок().ИмеетРавнуюСтруктуруСТаблицей(Таблица3());
+	Ожидаем.Что(Таблица1()).БезУчетаПорядКаКолонок().ИмеетРавнуюСтруктуруСТаблицей(Таблица3());
 КонецПроцедуры
 
-
+&Тест
 Процедура ТестДолжен_Проверить_Отрицание_ИмеетРавнуюСтруктуруСТаблицей() Экспорт
-	ОбъектТеста.Что(Таблица1()).Не_().ИмеетРавнуюСтруктуруСТаблицей(Таблица3());
+	Ожидаем.Что(Таблица1()).Не_().ИмеетРавнуюСтруктуруСТаблицей(Таблица3());
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_НеравенствоТаблицСИзмененнымПорядкомСтрок() Экспорт
 	Таблица2 = Таблица1();
 	Таблица2.Сортировать("К1 УБЫВ");
-	ОбъектТеста.Что(Таблица1()).Не_().РавнаТаблице(Таблица2);
+	Ожидаем.Что(Таблица1()).Не_().РавнаТаблице(Таблица2);
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_НеравенствоТаблицСИзмененнымПорядкомКолонок() Экспорт
-	ОбъектТеста.Что(Таблица1()).Не_().РавнаТаблице(Таблица3());
+	Ожидаем.Что(Таблица1()).Не_().РавнаТаблице(Таблица3());
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_НеравенствоТаблицСРазнымСоставомКолонок() Экспорт
 	Таблица2 = Таблица1();
 	Таблица2.Колонки.К1.Имя = "КК";
-	ОбъектТеста.Что(Таблица1()).Не_().РавнаТаблице(Таблица2);
+	Ожидаем.Что(Таблица1()).Не_().РавнаТаблице(Таблица2);
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_СодержитСтрокуТаблицы() Экспорт
 	СтрокаТаблицы = Таблица1()[0];
-	ОбъектТеста.Что(Таблица1()).СодержитСтрокуТаблицы(СтрокаТаблицы);
+	Ожидаем.Что(Таблица1()).СодержитСтрокуТаблицы(СтрокаТаблицы);
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_Отрицание_СодержитСТрокуТаблицы() Экспорт
 	СтрокаТаблицы = Таблица1()[0];
 	СтрокаТаблицы.К0 = "777";
-	ОбъектТеста.Что(Таблица1()).Не_().СодержитСтрокуТаблицы(СтрокаТаблицы);
+	Ожидаем.Что(Таблица1()).Не_().СодержитСтрокуТаблицы(СтрокаТаблицы);
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_РавнаТаблице_БезУчетаПорядкаСтрок() Экспорт
 	Таблица2 = Таблица1();
 	Таблица2.Сортировать("К1 УБЫВ");
-	ОбъектТеста.Что(Таблица1()).БезУчетаПорядкаСтрок().РавнаТаблице(Таблица2);
+	Ожидаем.Что(Таблица1()).БезУчетаПорядкаСтрок().РавнаТаблице(Таблица2);
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_РавнаТаблице_БезУчетаПорядкаКолонок() Экспорт
-	ОбъектТеста.Что(Таблица1()).БезУчетаПорядкаКолонок().РавнаТаблице(Таблица3());
+	Ожидаем.Что(Таблица1()).БезУчетаПорядкаКолонок().РавнаТаблице(Таблица3());
 КонецПроцедуры
 
+&Тест
 Процедура ТестДолжен_Проверить_РавнаТаблице_БезУчетаИменКолонок() Экспорт
-	ОбъектТеста.Что(Таблица1()).БезУчетаИменКолонок().РавнаТаблице(Таблица2());
+	Ожидаем.Что(Таблица1()).БезУчетаИменКолонок().РавнаТаблице(Таблица2());
 КонецПроцедуры
 
 // helpers
@@ -156,10 +148,4 @@
 	СтрТЗ.К2 = "33";
 
 	Возврат ТЗ;
-КонецФункции
-
-Процедура Инициализация()
-	ОбъектТеста = ЗагрузитьСценарий(ОбъединитьПути(ТекущийСценарий().Каталог, "..", "src", "bdd-asserts.os"));
-КонецПроцедуры
-
-Инициализация();
+КонецФункции

tests/bdd-assertions-tests-additional.os

@@ -1,30 +1,15 @@
-Перем мОбъектТеста;
-
-
-Функция ПолучитьСписокТестов(юТест) Экспорт
-	ВсеТесты = Новый Массив;
-
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетМетод_НеВыбрасываетИсключениеДляСуществующегоМетода");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетМетод_ВыбрасываетИсключениеДляОтсутствующегоМетода");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетМетод_ВыбрасываетИсключениеСУказаннымТекстом");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетМетод_ПоддерживаетОтрицание");
-	ВсеТесты.Добавить("ТестДолжен_Проверить_ИмеетМетод_ПоддерживаетЦепныеВызовы");
-
-	Возврат ВсеТесты;
-КонецФункции
-
-
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетМетод_НеВыбрасываетИсключениеДляСуществующегоМетода() Экспорт
-	мОбъектТеста
+	Ожидаем
 		.Что(Новый Массив)
 		.ИмеетМетод("Добавить")
 		;
 КонецПроцедуры
 
-
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетМетод_ВыбрасываетИсключениеДляОтсутствующегоМетода() Экспорт
 	Попытка
-		мОбъектТеста
+		Ожидаем
 			.Что(Новый Массив)
 			.ИмеетМетод("ТакогоИмениМетодаНеДолжноБыть");
 	Исключение
@@ -36,13 +21,13 @@
 	ВызватьИсключение "Проверка существования у объекта несуществующего метода должна была выбросить исключение, но этого не произошло";
 КонецПроцедуры
 
-
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетМетод_ВыбрасываетИсключениеСУказаннымТекстом() Экспорт
 	Перем ЧастьТекста, Сообщение;
 
 	ЧастьТекста = "ЭтотТекстДолженБытьВТекстеИсключения*#1~";
 	Попытка
-		мОбъектТеста
+		Ожидаем
 			.Что(Новый Массив, ЧастьТекста)
 			.ИмеетМетод("ТакогоИмениМетодаНеДолжноБыть");
 	Исключение
@@ -61,10 +46,10 @@
 	ВызватьИсключение "Проверка существования у объекта несуществующего метода должна была выбросить исключение, но этого не произошло";
 КонецПроцедуры
 
-
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетМетод_ПоддерживаетОтрицание() Экспорт
 	Попытка
-		мОбъектТеста
+		Ожидаем
 			.Что(Новый Массив)
 			.Не_()
 			.ИмеетМетод("ТакогоИмениМетодаНеДолжноБыть");
@@ -73,17 +58,9 @@
 	КонецПопытки;
 КонецПроцедуры
 
-
+&Тест
 Процедура ТестДолжен_Проверить_ИмеетМетод_ПоддерживаетЦепныеВызовы() Экспорт
-	Если ТипЗнч(мОбъектТеста.Что(Новый Массив).ИмеетМетод("Добавить")) <> Тип("БДДАссерт") Тогда
+	Если ТипЗнч(Ожидаем.Что(Новый Массив).ИмеетМетод("Добавить")) <> Тип("БДДАссерт") Тогда
 		ВызватьИсключение "Ожидали, что метод ИмеетМетод() поддерживает цепные вызовы (возвращает объект)";
 	КонецЕсли;
-КонецПроцедуры
-
-
-Процедура Инициализация()
-	мОбъектТеста = ЗагрузитьСценарий(ОбъединитьПути(ТекущийСценарий().Каталог, "..", "src", "bdd-asserts.os"));
-КонецПроцедуры
-
-
-Инициализация();
+КонецПроцедуры

tests/bdd-assertions-tests-parallel.os

@@ -1,6 +1,4 @@
-#Использовать ".."
-
-Функция ПолучитьСписокТестов(юТест) Экспорт
+Функция ПолучитьСписокТестов(юТест) Экспорт
 	ВсеТесты = Новый Массив;
 	ВсеТесты.Добавить("ТестДолжен_Проверить_ОбработкуАссертовВФоновыхЗаданиях");