-
Notifications
You must be signed in to change notification settings - Fork 117
Expand file tree
/
Copy pathlibrarytest.os
More file actions
37 lines (24 loc) · 1.47 KB
/
librarytest.os
File metadata and controls
37 lines (24 loc) · 1.47 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
#Использовать "testlib"
#Использовать "customlib"
Перем юТест;
Функция ПолучитьСписокТестов(Знач Тесты) Экспорт
юТест = Тесты;
Список = Новый Массив;
Список.Добавить("ТестДолжен_ИспользоватьВстроенныйЗагрузчик");
Список.Добавить("ТестДолжен_ИспользоватьПользовательскийЗагрузчик");
Возврат Список;
КонецФункции
Процедура ТестДолжен_ИспользоватьВстроенныйЗагрузчик() Экспорт
А = "";
ОбщиеФункции.Скажи("Привет", А);
юТест.ПроверитьРавенство("Привет", А);
юТест.ПроверитьРавенство(1, ОбщиеФункции.Один());
КонецПроцедуры
Процедура ТестДолжен_ИспользоватьПользовательскийЗагрузчик() Экспорт
Супер = Новый СуперТип();
Супер.А = 1;
юТест.ПроверитьРавенство(1, Супер.А);
юТест.ПроверитьРавенство("Привет", Супер.Привет());
НекийОбщийМодуль.УстановитьПоСсылке(Супер.А);
юТест.ПроверитьРавенство(100, Супер.А);
КонецПроцедуры