--- a/ImmutableArray.st	Fri Apr 13 15:03:30 2012 +0100
+++ b/ImmutableArray.st	Sat May 05 22:58:24 2012 +0100
@@ -105,18 +105,6 @@
 
 !ImmutableArray methodsFor:'copying'!
 
-copyEmpty
-    "when copying, return a real (mutable) Array"
-
-    ^ Array new:self size
-!
-
-copyEmptyAndGrow:size
-    "when copying, return a real (mutable) Array"
-
-    ^ Array new:size
-!
-
 postCopy
     "when copied, make it me a real (mutable) Array"
 
@@ -136,7 +124,11 @@
 
     sz := self size.
     ^ (Array new:sz)
-	replaceFrom:1 to:sz with:self startingAt:1
+        replaceFrom:1 to:sz with:self startingAt:1
+
+    "
+     #(1 2 3 4) asImmutableArray shallowCopy
+    "
 ! !
 
 !ImmutableArray methodsFor:'error handling'!
@@ -185,13 +177,13 @@
 !ImmutableArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.29 2012/02/27 19:44:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.30 2012/04/21 16:00:59 stefan Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.29 2012/02/27 19:44:21 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.30 2012/04/21 16:00:59 stefan Exp §'
 !
 
 version_SVN
-    ^ '$Id: ImmutableArray.st 10792 2012-03-21 17:45:38Z vranyj1 $'
+    ^ '$Id: ImmutableArray.st 10807 2012-05-05 21:58:24Z vranyj1 $'
 ! !