Initial data commit

Task/Compound-data-type/Zonnon/compound-data-type.zonnon

@@ -0,0 +1,23 @@
+{ref,public} (* class *)
+	Point = object(ord,abs: integer)
+	var
+		(* instance variables *)
+		{public,immutable} x,y: integer;
+
+	(* method *)
+	procedure {public} Ord():integer;
+	begin
+		return y
+	end Ord;
+
+	(* method *)
+	procedure {public} Abs():integer;
+	begin
+		return x
+	end Abs;
+
+	(* constructor *)
+	begin
+		self.x := ord;
+		self.y := abs;
+	end Point;