--- a/ImmutableArray.st	Mon Aug 18 20:51:21 2014 +0200
+++ b/ImmutableArray.st	Sat Aug 23 19:43:56 2014 +0200
@@ -101,6 +101,12 @@
 
 asImmutableArray
     ^ self
+!
+
+asMutableCollection
+    "return a writable copy of myself"
+
+    ^ self copy changeClassTo:Array
 ! !
 
 !ImmutableArray methodsFor:'copying'!
@@ -180,10 +186,10 @@
 !ImmutableArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.32 2014-05-06 20:21:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.33 2014-08-23 17:43:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.32 2014-05-06 20:21:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableArray.st,v 1.33 2014-08-23 17:43:56 cg Exp $'
 ! !