diff --git a/Source/GSString.m b/Source/GSString.m
index 5a56a25d7..d8aceee79 100644
--- a/Source/GSString.m
+++ b/Source/GSString.m
@@ -2928,7 +2928,7 @@ transmute(ivars self, NSString *aString)
   unsigned	count;
 
   RELEASE(self);
-  self = [GSCString alloc];
+  self = (id)NSAllocateObject(GSCStringClass, 0, GSObjCZone(self));
   [aCoder decodeValueOfObjCType: @encode(unsigned) at: &count];
   if (count > 0)
     {
@@ -2958,7 +2958,7 @@ transmute(ivars self, NSString *aString)
   unsigned	count;
 
   RELEASE(self);
-  self = [GSMutableString alloc];
+  self = (id)NSAllocateObject(GSMutableStringClass, 0, GSObjCZone(self));
   [aCoder decodeValueOfObjCType: @encode(unsigned) at: &count];
   if (count > 0)
     {
@@ -2988,7 +2988,7 @@ transmute(ivars self, NSString *aString)
   unsigned	count;
 
   RELEASE(self);
-  self = [GSUnicodeString alloc];
+  self = (id)NSAllocateObject(GSUnicodeStringClass, 0, GSObjCZone(self));
   [aCoder decodeValueOfObjCType: @encode(unsigned) at: &count];
   if (count > 0)
     {
@@ -3018,7 +3018,7 @@ transmute(ivars self, NSString *aString)
   unsigned	count;
 
   RELEASE(self);
-  self = [GSMutableString alloc];
+  self = (id)NSAllocateObject(GSMutableStringClass, 0, GSObjCZone(self));
   [aCoder decodeValueOfObjCType: @encode(unsigned) at: &count];
   if (count > 0)
     {