Data Update

Task/Enumerations/EMal/enumerations.emal

@@ -0,0 +1,22 @@
+in Org:RosettaCode
+type Fruits
+enum
+  int APPLE, BANANA, CHERRY
+end
+type ExplicitFruits
+enum
+  int APPLE = 10
+  int BANANA = 20
+  int CHERRY = 1
+end
+type Main
+for each generic enumeration in generic[Fruits, ExplicitFruits]
+  writeLine("[" + Generic.name(enumeration) + "]")
+  writeLine("getting an object with value = 1:")
+  writeLine(:enumeration.byValue(1))
+  writeLine("iterating over the items:")
+  for each var fruit in :enumeration
+    writeLine(fruit)
+  end
+  writeLine()
+end