|
11 | 11 |
|
12 | 12 | ВсеШаги.Добавить("ЯУстанавливаюПутьВыполненияКомандыКТекущейБиблиотеке");
|
13 | 13 | ВсеШаги.Добавить("ВКаталогеИзПеременнойСоздаетсяФайлИлиКаталог");
|
| 14 | + ВсеШаги.Добавить("ВКаталогеИзПеременнойНЕСоздаетсяФайлИлиКаталог"); |
14 | 15 | ВсеШаги.Добавить("ЯДобавляюПараметрыДляКоманды");
|
15 | 16 | ВсеШаги.Добавить("ЯДобавляюОпциюДляКомандыИзПеременной");
|
16 | 17 | ВсеШаги.Добавить("ЯДобавляюАргументДляКомандыИзПеременной");
|
17 | 18 | ВсеШаги.Добавить("ЯУстанавливаюПеременнуюОкруженияИзПеременной");
|
18 | 19 | ВсеШаги.Добавить("ЯСоздаюВременныйКаталогИСохраняюЕгоВПеременной");
|
| 20 | + ВсеШаги.Добавить("ЯСоздаюТестовыйПакетСЗависимостямиРазработчикаВПеременной"); |
19 | 21 |
|
20 | 22 | Возврат ВсеШаги;
|
21 | 23 | КонецФункции
|
|
126 | 128 | Функция КаталогБиблиотеки()
|
127 | 129 | Возврат ОбъединитьПути(ТекущийСценарий().Каталог, "..", "..");
|
128 | 130 | КонецФункции
|
| 131 | + |
| 132 | +//В каталоге из переменной "РабочийКаталог" НЕ создается файл или каталог "oscript_modules/asserts" |
| 133 | +Процедура ВКаталогеИзПеременнойНЕСоздаетсяФайлИлиКаталог(Знач ИмяПеременной, Знач ОтносительныйПуть) Экспорт |
| 134 | + |
| 135 | + Каталог = БДД.ПолучитьИзКонтекста(ИмяПеременной); |
| 136 | + ПолныйПуть = ОбъединитьПути(Каталог, ОтносительныйПуть); |
| 137 | + |
| 138 | + ФайлИлиКаталог = Новый Файл(ПолныйПуть); |
| 139 | + Если ФайлИлиКаталог.Существует() Тогда |
| 140 | + ВызватьИсключение СтрШаблон("Файл или каталог <%1> не должен существовать, но он существует", ПолныйПуть); |
| 141 | + КонецЕсли; |
| 142 | + |
| 143 | +КонецПроцедуры |
| 144 | + |
| 145 | +//Я создаю тестовый пакет с зависимостями разработчика в переменной "РабочийКаталог" |
| 146 | +Процедура ЯСоздаюТестовыйПакетСЗависимостямиРазработчикаВПеременной(Знач ИмяПеременной) Экспорт |
| 147 | + |
| 148 | + КаталогПакета = БДД.ПолучитьИзКонтекста(ИмяПеременной); |
| 149 | + |
| 150 | + // Создаем packagedef с зависимостями разработчика |
| 151 | + СодержимоеPackagedef = |
| 152 | + "Описание.Имя(""test-dev-deps"") |
| 153 | + | .Версия(""1.0.0"") |
| 154 | + | .ВерсияСреды(""1.9.2"") |
| 155 | + | .ЗависитОт(""strings"", ""0.5.0"") |
| 156 | + | .РазработкаЗависитОт(""asserts"", ""1.4.0"") |
| 157 | + | .РазработкаЗависитОт(""1bdd"", ""1.15.1"") |
| 158 | + | .ВключитьФайл(""src"");"; |
| 159 | + |
| 160 | + ФайлPackagedef = ОбъединитьПути(КаталогПакета, "packagedef"); |
| 161 | + ЗаписьТекста = Новый ЗаписьТекста(ФайлPackagedef, КодировкаТекста.UTF8); |
| 162 | + ЗаписьТекста.Записать(СодержимоеPackagedef); |
| 163 | + ЗаписьТекста.Закрыть(); |
| 164 | + |
| 165 | + // Создаем каталог src с тестовым файлом |
| 166 | + КаталогSrc = ОбъединитьПути(КаталогПакета, "src"); |
| 167 | + СоздатьКаталог(КаталогSrc); |
| 168 | + |
| 169 | + ФайлТеста = ОбъединитьПути(КаталогSrc, "test.os"); |
| 170 | + ЗаписьТекста = Новый ЗаписьТекста(ФайлТеста, КодировкаТекста.UTF8); |
| 171 | + ЗаписьТекста.Записать("Процедура ТестоваяПроцедура() Экспорт" + Символы.ПС + "КонецПроцедуры"); |
| 172 | + ЗаписьТекста.Закрыть(); |
| 173 | + |
| 174 | +КонецПроцедуры |
0 commit comments