RosettaCodeData/Task/Repeat-a-string/Factor/repeat-a-string.factor
2023-07-01 13:44:08 -04:00

3 lines
89 B
Factor

: repeat-string ( str n -- str' ) swap <repetition> concat ;
"ha" 5 repeat-string print