RosettaCodeData/Task/Enumerations/AmigaE/enumerations.amiga

8 lines
124 B
Text
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
ENUM APPLE, BANANA, CHERRY
PROC main()
DEF x
ForAll({x}, [APPLE, BANANA, CHERRY],
`WriteF('\d\n', x))
ENDPROC