URL change,vipackConf.json reading

This commit is contained in:
mane 2020-04-26 05:54:23 +04:00
parent d75b48915d
commit b30deb5bd9
3 changed files with 33 additions and 29 deletions

View file

@ -1,5 +1,5 @@
MODULE vpkConf;
IMPORT Files;
IMPORT Files, vpkFsHelper;
PROCEDURE confExists*(VAR confFile: ARRAY OF CHAR ):BOOLEAN;
BEGIN
@ -9,8 +9,7 @@ BEGIN
END confExists;
PROCEDURE makeConf*(VAR confFilePath: ARRAY OF CHAR);
VAR f : Files.File;
PROCEDURE makeConf*(VAR confFilePath: ARRAY OF CHAR;VAR f:Files.File);
BEGIN
f := Files.New(confFilePath);
@ -18,6 +17,11 @@ Files.Register(f);
END makeConf;
PROCEDURE makeDir*(VAR confDirPath: ARRAY OF CHAR):BOOLEAN;
BEGIN
RETURN vpkFsHelper.mkDir(confDirPath);
END makeDir;
BEGIN