From be5690bf05707107bc6f02005af82399b0c1c655 Mon Sep 17 00:00:00 2001
From: seh <henesy.dev@gmail.com>
Date: Mon, 18 Mar 2019 03:44:58 -0500
Subject: add work on modules example

---
 Modules/towns.b | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 Modules/towns.b

(limited to 'Modules/towns.b')

diff --git a/Modules/towns.b b/Modules/towns.b
new file mode 100644
index 0000000..c417462
--- /dev/null
+++ b/Modules/towns.b
@@ -0,0 +1,22 @@
+implement Towns;
+
+include "towns.m";
+
+init() {
+	persons = load Persons "./persons.dis";
+}
+
+mktown(): ref Town {
+	return ref Town;
+}
+
+Town.stringify(t: self ref Town): string {
+	Person: import persons;
+
+	s := "Name: " + t.name + "\nSize: " + string len t.pop + "\nMembers:";
+
+	for(i := 0; i < len t.pop; i++)
+		s += "\n→ " + t.pop[i].stringify();
+
+	return s;
+}
-- 
cgit v1.2.3