RosettaCodeData/Task/String-case/Oforth/string-case.fth

3 lines
40 B
Forth

"alphaBETA" toUpper
"alphaBETA" toLower