File tree Expand file tree Collapse file tree 3 files changed +31
-8
lines changed
src/core/Классы/internal/path Expand file tree Collapse file tree 3 files changed +31
-8
lines changed Original file line number Diff line number Diff line change @@ -296,7 +296,17 @@ cli поддерживает автоматическую инициализац
296
296
297
297
``` bsl
298
298
Процедура ОписаниеКоманды(Команда) Экспорт
299
-
299
+ Путь = Команда.Аргумент("PATH", "" ,"Описание аргумента")
300
+ .ТСтрока() / тип опции Строка
301
+ .ВОкружении("ИМЯ_ПЕРЕМЕННОЙ")
302
+ .ПоУмолчанию(Ложь)
303
+ .СкрытьВСправке(); // Любой тип
304
+
305
+ Отладка = Команда.Опция("o opt", Ложь ,"Описание опции")
306
+ .ТСтрока() / тип опции Строка
307
+ .ВОкружении("ИМЯ_ПЕРЕМЕННОЙ")
308
+ .ПоУмолчанию(Ложь)
309
+ .СкрытьВСправке(); // Любой тип
300
310
КонецПроцедуры
301
311
```
302
312
Original file line number Diff line number Diff line change 4
4
//
5
5
6
6
Описание.Имя("cli")
7
- .Версия("0.9.4 ")
7
+ .Версия("0.9.5 ")
8
8
.Автор("Khorev Aleksey")
9
9
10
10
.Описание("Данный пакет облегчает создание консольных приложений на Oscript")
16
16
.ВключитьФайл("packagedef")
17
17
.ЗависитОт("logos")
18
18
.ЗависитОт("delegate", "0.2.0")
19
- .ЗависитОт("fluent", "0.2.2")
19
+ // .ЗависитОт("fluent", "0.2.2")
20
20
.ЗависитОт("asserts")
21
21
//.ЗависитОт("1bdd") // Необходимо установил для тестирования
22
22
//.ЗависитОт("1testrunner") // Необходимо установил для тестирования
Original file line number Diff line number Diff line change 1
1
#Использовать logos
2
- #Использовать fluent
3
2
4
3
перем Лог ;
5
4
151
150
152
151
Процедура СортироватьМассив (МассивСоединений )
153
152
154
- ПроцессорКоллекций = ПроцессорыКоллекций.ИзКоллекции(МассивСоединений);
155
- МассивСоединений = ПроцессорКоллекций
156
- .Сортировать("Результат = Элемент1.Парсер.Приоритет() > Элемент2.Парсер.Приоритет()" )
157
- .ВМассив();
153
+ Для й = 0 По МассивСоединений.Количество() - 1 Цикл
154
+ Флаг = Ложь ;
155
+ к = МассивСоединений.Количество() - 1 ;
156
+ Пока к > й Цикл
157
+ Элемент = МассивСоединений[к - 1 ];
158
+ СледующийЭлемент = МассивСоединений[к];
159
+ РезультатСортировки = Элемент.Парсер.Приоритет() > СледующийЭлемент.Парсер.Приоритет();
160
+ Если РезультатСортировки > 0 Тогда
161
+ МассивСоединений[к - 1 ] = СледующийЭлемент;
162
+ МассивСоединений[к] = Элемент;
163
+ Флаг = Истина ;
164
+ КонецЕсли ;
165
+ к = к - 1 ;
166
+ КонецЦикла ;
167
+ Если НЕ Флаг Тогда
168
+ Прервать ;
169
+ КонецЕсли ;
170
+ КонецЦикла ;
158
171
159
172
КонецПроцедуры
160
173
You can’t perform that action at this time.
0 commit comments