summaryrefslogtreecommitdiff
path: root/Modules/persons.b
diff options
context:
space:
mode:
Diffstat (limited to 'Modules/persons.b')
-rw-r--r--Modules/persons.b22
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;
+}