--- a/LargeInteger.st	Wed Mar 25 11:52:15 2015 +0100
+++ b/LargeInteger.st	Wed Mar 25 15:12:51 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libbasic' }"
 
+"{ NameSpace: Smalltalk }"
+
 Integer subclass:#LargeInteger
 	instanceVariableNames:'sign digitByteArray'
 	classVariableNames:''
@@ -255,9 +259,9 @@
     |digits|
 
     msb == false ifTrue:[
-	digits := aByteArrayOfDigits
+        digits := aByteArrayOfDigits
     ] ifFalse:[
-	digits := aByteArrayOfDigits copy reverse
+        digits := aByteArrayOfDigits reversed
     ].
     ^ self basicNew setDigits:digits
 
@@ -297,8 +301,6 @@
     "Modified: / 8.5.1998 / 21:40:41 / cg"
 ! !
 
-
-
 !LargeInteger class methodsFor:'queries'!
 
 isBuiltInClass
@@ -5393,10 +5395,10 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.222 2014-12-23 20:05:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.223 2015-03-25 14:12:51 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.222 2014-12-23 20:05:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.223 2015-03-25 14:12:51 cg Exp $'
 ! !