post rebranding

This commit is contained in:
Antranig Vartanian 2024-05-11 19:17:23 +04:00
parent 4169aecd5b
commit 95b512baf4
No known key found for this signature in database
GPG key ID: DE3998662D59F21C
66 changed files with 716 additions and 15 deletions

10
examples/while/Makefile Normal file
View file

@ -0,0 +1,10 @@
VOC = /opt/voc/bin/voc
all:
$(VOC) -m While.Mod
clean:
rm *.c
rm *.h
rm *.o
rm *.sym

17
examples/while/While.Mod Normal file
View file

@ -0,0 +1,17 @@
MODULE while;
IMPORT Out;
VAR
i : INTEGER;
BEGIN
i := 0;
Out.String("WHILE loop started"); Out.Ln;
WHILE i < 10 DO
i := i + 1;
Out.Int(i, 0); Out.Ln;
END;
END while.

View file

@ -0,0 +1,17 @@
MODULE while;
IMPORT Out;
VAR
i : INTEGER;
BEGIN
i := 0;
Out.String("WHILE loop started"); Out.Ln;
WHILE i < 10 DO
i := i + 1;
Out.Int(i, 0); Out.Ln;
END;
END while.