From 334b07347f78731a22135c1c15fa94bcd2bf938c Mon Sep 17 00:00:00 2001 From: Nikita Gryzlov Date: Wed, 12 Dec 2018 15:28:59 +0700 Subject: [PATCH 1/3] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=BB=D0=B5?= =?UTF-8?q?=D0=BD=20=D0=B2=D1=8B=D0=B2=D0=BE=D0=B4=20=D1=81=D1=82=D0=B5?= =?UTF-8?q?=D0=BA-=D1=82=D1=80=D0=B5=D0=B9=D1=81=D0=B0=20=D0=BF=D1=80?= =?UTF-8?q?=D0=B8=20=D0=B8=D1=81=D0=BA=D0=BB=D1=8E=D1=87=D0=B5=D0=BD=D0=B8?= =?UTF-8?q?=D0=B8?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/bdd-asserts.os | 38 ++++++++++++++++++++++++++++++++++++-- 1 file changed, 36 insertions(+), 2 deletions(-) diff --git a/src/bdd-asserts.os b/src/bdd-asserts.os index 6e689fb..c01e974 100644 --- a/src/bdd-asserts.os +++ b/src/bdd-asserts.os @@ -299,8 +299,42 @@ КонецФункции Процедура ВызватьОшибкуПроверки(Знач СообщениеОшибки) - Префикс = "["+ СтатусыРезультатаТестирования.ОшибкаПроверки + "]"; - ВызватьИсключение Префикс + " " + СообщениеОшибки; + Префикс = "[" + СтатусыРезультатаТестирования.ОшибкаПроверки + "]"; + ТекстИсключения = Префикс + " " + СообщениеОшибки; + Попытка + ВызватьИсключение ТекстИсключения; + Исключение + ИнформацияОбОшибке = ИнформацияОбОшибке(); + СтекВызовов = ИнформацияОбОшибке.ПолучитьСтекВызовов(); + СтекТрейс = Новый Массив; + СтекТрейс.Добавить("Стек трейс:"); + + Отступ = ""; + СимволОтступа = " "; + ПервыйКадр = Истина; + Для Каждого КадрСтекаВызовов Из СтекВызовов Цикл + // пропустим первый кадр стека, т.к. он ведет на служебный вызов исключения + Если ПервыйКадр Тогда + ПервыйКадр = Ложь; + Продолжить; + КонецЕсли; + + Отступ = Отступ + СимволОтступа; + + СтрокаСтекТрейса = СтрШаблон( + "%1%2 / Метод %3 / Строка %4", + Отступ, + КадрСтекаВызовов.ИмяМодуля, + КадрСтекаВызовов.Метод, + Формат(КадрСтекаВызовов.НомерСтроки, "ЧГ=") + ); + СтекТрейс.Добавить(СтрокаСтекТрейса); + КонецЦикла; + СтекТрейс = СтрСоединить(СтекТрейс, Символы.ПС); + + ТекстИсключения = ТекстИсключения + Символы.ПС + СтекТрейс; + ВызватьИсключение ТекстИсключения; + КонецПопытки КонецПроцедуры Функция ЛогическоеВыражениеВерно(Знач ЛогическоеВыражение) From 805bee0118ddf5ac88c5c359f74eacd388230bd8 Mon Sep 17 00:00:00 2001 From: Nikita Gryzlov Date: Thu, 13 Dec 2018 13:28:22 +0700 Subject: [PATCH 2/3] =?UTF-8?q?=D0=9F=D0=BE=D0=B2=D1=8B=D1=81=D0=B8=D0=BB?= =?UTF-8?q?=D0=B8=20=D1=82=D1=80=D0=B5=D0=B1=D1=83=D0=B5=D0=BC=D1=83=D1=8E?= =?UTF-8?q?=20=D0=B2=D0=B5=D1=80=D1=81=D0=B8=D1=8E=20=D0=B4=D0=B2=D0=B8?= =?UTF-8?q?=D0=B6=D0=BA=D0=B0.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit ПолучитьСтекВызовов доступна только в 1.0.21 --- packagedef | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/packagedef b/packagedef index e79ed64..f3ebf76 100644 --- a/packagedef +++ b/packagedef @@ -1,7 +1,8 @@  Описание.Имя("asserts") .Версия("1.1.1") + .ВерсияСреды("1.0.21") .ВключитьФайл("src") .ВключитьФайл("tests") .ВключитьФайл("lib.config") - .ВключитьФайл("readme.md") \ No newline at end of file + .ВключитьФайл("readme.md") From abd6aebfec76828e845cc4f94b83fcfb0b129ace Mon Sep 17 00:00:00 2001 From: Nikita Gryzlov Date: Thu, 13 Dec 2018 13:33:33 +0700 Subject: [PATCH 3/3] =?UTF-8?q?=D0=95=D0=B4=D0=B8=D0=BD=D1=8B=D0=B9=20?= =?UTF-8?q?=D0=BC=D0=B0=D1=81=D1=81=D0=B8=D0=B2=20=D0=B4=D0=BB=D1=8F=20?= =?UTF-8?q?=D1=82=D0=B5=D0=BA=D1=81=D1=82=D0=B0=20=D0=B8=D1=81=D0=BA=D0=BB?= =?UTF-8?q?=D1=8E=D1=87=D0=B5=D0=BD=D0=B8=D1=8F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/bdd-asserts.os | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/bdd-asserts.os b/src/bdd-asserts.os index c01e974..e68ad74 100644 --- a/src/bdd-asserts.os +++ b/src/bdd-asserts.os @@ -306,8 +306,9 @@ Исключение ИнформацияОбОшибке = ИнформацияОбОшибке(); СтекВызовов = ИнформацияОбОшибке.ПолучитьСтекВызовов(); - СтекТрейс = Новый Массив; - СтекТрейс.Добавить("Стек трейс:"); + МассивТекстИсключения = Новый Массив; + МассивТекстИсключения.Добавить(ТекстИсключения); + МассивТекстИсключения.Добавить("Стек трейс:"); Отступ = ""; СимволОтступа = " "; @@ -328,11 +329,10 @@ КадрСтекаВызовов.Метод, Формат(КадрСтекаВызовов.НомерСтроки, "ЧГ=") ); - СтекТрейс.Добавить(СтрокаСтекТрейса); + МассивТекстИсключения.Добавить(СтрокаСтекТрейса); КонецЦикла; - СтекТрейс = СтрСоединить(СтекТрейс, Символы.ПС); + ТекстИсключения = СтрСоединить(МассивТекстИсключения, Символы.ПС); - ТекстИсключения = ТекстИсключения + Символы.ПС + СтекТрейс; ВызватьИсключение ТекстИсключения; КонецПопытки КонецПроцедуры