RosettaCodeData/Task/Repeat-a-string/Wart/repeat-a-string.wart

8 lines
99 B
Plaintext

def (s * n) :case (string? s)
with outstring
repeat n
pr s
("ha" * 5)
=> "hahahahaha"