aboutsummaryrefslogtreecommitdiff
path: root/examples/learn/16-tagged-enums.zc
diff options
context:
space:
mode:
Diffstat (limited to 'examples/learn/16-tagged-enums.zc')
-rw-r--r--examples/learn/16-tagged-enums.zc18
1 files changed, 18 insertions, 0 deletions
diff --git a/examples/learn/16-tagged-enums.zc b/examples/learn/16-tagged-enums.zc
new file mode 100644
index 0000000..ba430f4
--- /dev/null
+++ b/examples/learn/16-tagged-enums.zc
@@ -0,0 +1,18 @@
+enum shape { circle { int r; }, rect { int w; int h; }, dot };
+int area(shape* s) {
+ switch (s) {
+ case circle(r): return r * r * 3;
+ case rect(w, h): return w * h;
+ case dot: return 0;
+ }
+ return -1;
+}
+fn main() {
+ shape* s = shape.circle(3);
+ put_n(area(s)); put_c(10);
+ free(d*s);
+ shape* t = shape.rect(2, 5);
+ put_n(area(t)); put_c(10);
+ free(d*t);
+ return 0;
+}