Module renaming

This commit is contained in:
mane 2020-04-02 23:20:19 +04:00
parent 67a280f5da
commit 9423fb1b37
18 changed files with 1629 additions and 0 deletions

15
vpkTest.Mod Normal file
View file

@ -0,0 +1,15 @@
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.