From f45cde7ba7717c0ae21fc3eace7a74a4edfd830c Mon Sep 17 00:00:00 2001
From: "hyunghwan.chung" <hyunghwan.chung@c9d47f8d-4fed-4a2f-8cad-691f5fbe3904>
Date: Sun, 7 May 2017 14:45:27 +0000
Subject: [PATCH] redefined Integer<<timesRepeat:

---
 moo/kernel/Magnitu.moo | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/moo/kernel/Magnitu.moo b/moo/kernel/Magnitu.moo
index b6ef0bd..67be249 100644
--- a/moo/kernel/Magnitu.moo
+++ b/moo/kernel/Magnitu.moo
@@ -285,9 +285,7 @@ class Number(Magnitude)
 		(* self < 0 ifTrue: [^-1].
 		self > 0 ifTrue: [^1].
 		^0.*)
-		^if (self < 0) { -1 }
-		 elsif (self > 0) { 1 }
-		 else { 0 }
+		^if (self < 0) { -1 } elsif (self > 0) { 1 } else { 0 }
 	}
 }
 
@@ -295,7 +293,10 @@ class(#limited) Integer(Number)
 {
 	method timesRepeat: aBlock
 	{
-		1 to: self by: 1 do: [ :count | aBlock value ].
+		## 1 to: self by: 1 do: [ :count | aBlock value ].
+		| count |
+		count := 0.
+		while (count < self) { aBlock value. count := count + 1 }
 	}
 }
 
@@ -307,7 +308,7 @@ class SmallInteger(Integer)
 	## }
 	
 	method(#primitive) asCharacter.
-	method(#primitive) asError.	
+	method(#primitive) asError.
 }
 
 class(#liword,#limited) LargeInteger(Integer)