mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-06 13:02:26 +00:00
nothing really works
This commit is contained in:
parent
3c59d73914
commit
1a573a5c83
3 changed files with 104 additions and 0 deletions
15
test.Mod
Normal file
15
test.Mod
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
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.
|
||||
Loading…
Add table
Add a link
Reference in a new issue