Code is written, nothing works

This commit is contained in:
Ruben Shekspir 2019-05-09 22:43:15 +04:00
parent 7a05c9b3e8
commit 344c0f0aa7
10 changed files with 176 additions and 42 deletions

View file

@ -3,27 +3,23 @@ IMPORT
JsonParser,
FileManager,
http,
Logger;
Logger,
DependencyResolver,
Settings;
CONST
MAXARRAYNUMBER = 1000000;
PROCEDURE install*;
VAR
fileData, buff, buff2: ARRAY MAXARRAYNUMBER OF CHAR;
jsonData: ARRAY MAXARRAYNUMBER OF CHAR;
success: BOOLEAN;
BEGIN
Logger.Log("Starting install process");
success := FileManager.Read("VersionFile.json", fileData);
success := FileManager.Read(Settings.packageFileName, jsonData);
IF ~success THEN Logger.Log("Some ERROR occured while reading VERSIONFILE") END;
ASSERT(success);
http.get("norayr.am", "/tmp/", "80", buff);
http.getClean(buff, buff2);
success := FileManager.Write("index.html", buff2);
IF ~success THEN Logger.Log("Some ERROR occured while writing to test gile") END;
ASSERT(success)
DependencyResolver.Resolve(jsonData);
END install;
BEGIN