add work on modules example

1 files changed, 22 insertions, 0 deletions

diff --git a/Modules/persons.b b/Modules/persons.b
new file mode 100644
index 0000000..1e64578
--- /dev/null
+++ b/Modules/persons.b
@@ -0,0 +1,22 @@
+implement Persons;
+
+include "persons.m";
+
+population: int;
+
+init() {
+	population = 0;
+}
+
+getpop(): int {
+	return population;
+}
+
+mkperson(): ref Person {
+	population++;
+	return ref Person;
+}
+
+Person.stringify(p: self ref Person): string {
+	return p.name;
+}