RosettaCodeData/Task/Enumerations/AmigaE/enumerations.amiga
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

7 lines
124 B
Text

ENUM APPLE, BANANA, CHERRY
PROC main()
DEF x
ForAll({x}, [APPLE, BANANA, CHERRY],
`WriteF('\d\n', x))
ENDPROC