4 lines
89 B
Factor
4 lines
89 B
Factor
|
|
: repeat-string ( str n -- str' ) swap <repetition> concat ;
|
||
|
|
|
||
|
|
"ha" 5 repeat-string print
|