mirror of
https://github.com/vishapoberon/oberonbyexample.git
synced 2026-04-05 21:02:25 +00:00
test also compiles.
This commit is contained in:
parent
28d02deeae
commit
0f58a5ac19
1 changed files with 5 additions and 3 deletions
8
test.Mod
8
test.Mod
|
|
@ -1,11 +1,13 @@
|
|||
MODULE test.
|
||||
MODULE test;
|
||||
|
||||
IMPORT Day;
|
||||
IMPORT Days;
|
||||
|
||||
VAR today: Days.Day;
|
||||
VAR today, yesterday, tomorrow: Days.Day;
|
||||
|
||||
BEGIN
|
||||
today := Days.mon; (*init*)
|
||||
|
||||
yesterday := Days.Prev(today);
|
||||
tomorrow := Days.Next(today);
|
||||
|
||||
END test.
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue