oberonbyexample/Days.Mod
2016-12-29 19:20:44 +04:00

8 lines
106 B
Modula-2

MODULE Days;
TYPE Day* = RECORD END;
VAR sun*, mon*, tue*, wed*, thu*, fri*, sat* : Day;
END Days.