add work on modules example

1 files changed, 14 insertions, 0 deletions

diff --git a/Modules/towns.m b/Modules/towns.m
new file mode 100644
index 0000000..b9eab0a
--- /dev/null
+++ b/Modules/towns.m
@@ -0,0 +1,14 @@
+include "persons.m";
+
+Towns: module {
+	init: fn();
+	mktown: fn(): ref Town;
+
+	persons: Persons;
+
+	Town: adt {
+		pop: array of ref Persons->Person;
+		name: string;
+		stringify: fn(t: self ref Town): string;
+	};
+};