-
Notifications
You must be signed in to change notification settings - Fork 5
Expand file tree
/
Copy pathtest5.os
More file actions
33 lines (24 loc) · 1.59 KB
/
test5.os
File metadata and controls
33 lines (24 loc) · 1.59 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
#Использовать osparser
#Использовать "./plugins"
ЧтениеТекста = Новый ЧтениеТекста("..\src\Классы\ПарсерВстроенногоЯзыка.os");
Исходник = ЧтениеТекста.Прочитать();
ЧтениеТекста.Закрыть();
Плагины = Новый Массив;
Плагины.Добавить(Новый ДетекторНеиспользуемыхПеременных);
ПараметрыПлагинов = Новый Соответствие;
Парсер = Новый ПарсерВстроенногоЯзыка;
Узлы = Парсер.Узлы();
ПроизвольноеОкружение = Парсер.Окружение();
// например, контекст формы:
Элемент = Узлы.ЭлементОкружения.Добавить();
Элемент.Имя = "ЭтаФорма";
ПроизвольноеОкружение.Переменные.Вставить("ЭтаФорма", Элемент);
// ...
Элемент = Узлы.ЭлементОкружения.Добавить();
Элемент.Имя = "РеквизитФормыВЗначение";
ПроизвольноеОкружение.Методы.Вставить("РеквизитФормыВЗначение", Элемент);
// ...
Парсер.Пуск(Исходник, Плагины, ПараметрыПлагинов, ПроизвольноеОкружение);
Для Каждого Ошибка Из Парсер.ТаблицаОшибок() Цикл
Сообщить(Ошибка.Текст)
КонецЦикла;