RosettaCodeData/Task/Repeat-a-string/Objeck/repeat-a-string.objeck

17 lines
336 B
Plaintext

bundle Default {
class Repeat {
function : Main(args : String[]) ~ Nil {
Repeat("ha", 5)->PrintLine();
}
function : Repeat(string : String, max : Int) ~ String {
repeat : String := String->New();
for(i := 0; i < max; i += 1;) {
repeat->Append(string);
};
return repeat;
}
}
}