vishapoberon/oberonbyexample
1
0
Fork 0
mirror of https://github.com/vishapoberon/oberonbyexample.git synced 2026-04-05 21:02:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

test also compiles.

Browse source
This commit is contained in:
norayr 2016-12-29 20:14:24 +04:00
parent 28d02deeae
commit 0f58a5ac19
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
test.Mod
View file

@ -1,11 +1,13 @@
MODULE test. MODULE test;
IMPORT Day; IMPORT Days;
VAR today: Days.Day; VAR today, yesterday, tomorrow: Days.Day;
BEGIN BEGIN
today := Days.mon; (*init*) today := Days.mon; (*init*)
yesterday := Days.Prev(today);
tomorrow := Days.Next(today);
END test. END test.