moved vipack specific sources to src

This commit is contained in:
Norayr Chilingarian 2020-05-07 19:59:12 +04:00
parent 8a476ab610
commit c02b5d6c83
23 changed files with 24 additions and 86 deletions

@ -1 +0,0 @@
Subproject commit abe322f45bff05b42da71271186a623d5e511428

View file

@ -18,23 +18,23 @@ copy-version-file-to-build-dir:
all: http
cd $(BUILDDIR) && \
$(VOC) -s \
../vpkGit.Mod \
../vpkFsHelper.Mod \
../vpkConf.Mod \
../vpkUserDetails.Mod \
../vpkSettings.Mod \
../vpkTime.Mod \
../vpkLogger.Mod \
../src/vpkGit.Mod \
../src/vpkFsHelper.Mod \
../src/vpkConf.Mod \
../src/vpkUserDetails.Mod \
../src/vpkSettings.Mod \
../src/vpkTime.Mod \
../src/vpkLogger.Mod \
../lists/src/Sys.Mod \
../lists/src/List.Mod \
../lists/src/strutils.Mod \
../vpkCharacterStack.Mod \
../vpkJsonParser.Mod \
../vpkFileManager.Mod \
../vpkPackageResolver.Mod \
../vpkDependencyResolver.Mod \
../vpkPackageFileParser.Mod \
../vipack.Mod -m
../src/vpkCharacterStack.Mod \
../src/vpkJsonParser.Mod \
../src/vpkFileManager.Mod \
../src/vpkPackageResolver.Mod \
../src/vpkDependencyResolver.Mod \
../src/vpkPackageFileParser.Mod \
../src/vipack.Mod -m
run:
@ -43,24 +43,24 @@ run:
http: clean
cd $(BUILDDIR) && \
$(VOC) -s ../vpkTime.Mod \
../vpkLogger.Mod \
$(VOC) -s ../src/vpkTime.Mod \
../src/vpkLogger.Mod \
../Internet/src/types.Mod \
../Internet/src/sockets.Mod \
../Internet/src/netdb.Mod \
../Internet/src/Internet.Mod \
../vpkHttp.Mod
../src/vpkHttp.Mod
json:
cd $(BUILDDIR) && \
$(VOC) -s \
../vpkTime.Mod \
../vpkLogger.Mod \
../diaspora2hugo/src/lists/Sys.Mod \
../diaspora2hugo/src/lists/List.Mod \
../diaspora2hugo/src/lists/strutils.Mod \
../vpkCharacterStack.Mod \
../vpkJsonParser.Mod
../src/vpkTime.Mod \
../src/vpkLogger.Mod \
../lists/src/Sys.Mod \
../lists/src/List.Mod \
../lists/src/strutils.Mod \
../src/vpkCharacterStack.Mod \
../src/vpkJsonParser.Mod
clean:
if [ -d "$(BUILDDIR)" ]; then rm -rf $(BUILDDIR); fi

View file

@ -156,7 +156,6 @@ BEGIN
UNTIL (text[i] = 0X) OR (i = LEN(text));
END dumpTextTill0;
PROCEDURE textToPstrings*(VAR text: ARRAY OF CHAR): pstrings;
VAR
i, j, lineNum, start, number: INTEGER;

View file

@ -1,15 +0,0 @@
MODULE test;
IMPORT Out;
VAR
string: POINTER TO ARRAY OF CHAR;
BEGIN
NEW(string, 42);
string[1] := "a";
Out.Char(string[1]);
Out.Ln();
Out.Int(ORD(string[1]), 10);
Out.Ln();
Out.Int(ORD(string[2]), 10);
Out.Ln();
COPY("Gago", string);
END test.

View file

@ -1,30 +0,0 @@
MODULE time;
IMPORT SYSTEM;
PROCEDURE -Aincludesystime '#include <sys/time.h>'; (* for gettimeofday *)
PROCEDURE -Aincludetime '#include <time.h>'; (* for localtime *)
PROCEDURE -Aincludesystypes '#include <sys/types.h>';
PROCEDURE -gettimeval "struct timeval tv; gettimeofday(&tv,0)";
PROCEDURE -tvsec(): LONGINT "tv.tv_sec";
PROCEDURE -tvusec(): LONGINT "tv.tv_usec";
PROCEDURE -sectotm(s: LONGINT) "struct tm *time = localtime((time_t*)&s)";
PROCEDURE -tmsec(): LONGINT "(LONGINT)time->tm_sec";
PROCEDURE -tmmin(): LONGINT "(LONGINT)time->tm_min";
PROCEDURE -tmhour(): LONGINT "(LONGINT)time->tm_hour";
PROCEDURE -tmmday(): LONGINT "(LONGINT)time->tm_mday";
PROCEDURE -tmmon(): LONGINT "(LONGINT)time->tm_mon";
PROCEDURE -tmyear(): LONGINT "(LONGINT)time->tm_year";
PROCEDURE Now*(VAR year, month, day, hour, min, sec: LONGINT);
BEGIN
gettimeval; sectotm(tvsec());
year := tmyear() + 1900;
month := tmmon();
day := tmmday();
hour := tmhour();
min := tmmin();
sec := tmsec();
END Now;
END time.

View file

@ -1,15 +0,0 @@
MODULE vpkTest;
IMPORT Out;
VAR
string: POINTER TO ARRAY OF CHAR;
BEGIN
NEW(string, 42);
string[1] := "a";
Out.Char(string[1]);
Out.Ln();
Out.Int(ORD(string[1]), 10);
Out.Ln();
Out.Int(ORD(string[2]), 10);
Out.Ln();
COPY("Gago", string);
END vpkTest.