RosettaCodeData/Task/Enumerations/AmigaE/enumerations.amiga
2023-07-01 13:44:08 -04:00

7 lines
124 B
Text

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