From 450d5226fd9a8e513f6680775bd35f4e2a83045c Mon Sep 17 00:00:00 2001
From: Andrew McCallum <mccallum@gnu.org>
Date: Thu, 23 Mar 1995 03:35:01 +0000
Subject: [PATCH] (shallowCopyAs:, emptyCopyAs:, copyAs:): Change arg type to
 (Class).

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@171 72102866-910b-0410-8b05-ffd578937521
---
 Headers/gnustep/base/Collecting.h | 6 +++---
 Source/KeyedCollection.m          | 4 ++--
 Source/objects/Collecting.h       | 6 +++---
 3 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/Headers/gnustep/base/Collecting.h b/Headers/gnustep/base/Collecting.h
index 91736d9f8..e2ca3c72d 100644
--- a/Headers/gnustep/base/Collecting.h
+++ b/Headers/gnustep/base/Collecting.h
@@ -112,11 +112,11 @@
 
 // COPYING 
 - emptyCopy;
-- emptyCopyAs: (id <Collecting>)aCollectionClass;
+- emptyCopyAs: (Class)aCollectionClass;
 - shallowCopy;
-- shallowCopyAs: (id <Collecting>)aCollectionClass;
+- shallowCopyAs: (Class)aCollectionClass;
 - copy;
-- copyAs: (id <Collecting>)aCollectionClass;
+- copyAs: (Class)aCollectionClass;
 - species;
 
 
diff --git a/Source/KeyedCollection.m b/Source/KeyedCollection.m
index 5b0f2a3a5..c78ca4a76 100644
--- a/Source/KeyedCollection.m
+++ b/Source/KeyedCollection.m
@@ -218,7 +218,7 @@
 
 // COPYING;
 
-- shallowCopyAs: (id <Collecting>)aCollectionClass
+- shallowCopyAs: (Class)aCollectionClass
 {
   id (*putElementAtKeyImp)(id,SEL,elt,elt);
   id newColl;
@@ -229,7 +229,7 @@
 			    content, key);
     }
 
-  if ([aCollectionClass conformsToProtocol:@protocol(KeyedCollecting)])
+  if ([(id)aCollectionClass conformsToProtocol:@protocol(KeyedCollecting)])
     {
       newColl = [self emptyCopyAs:aCollectionClass];
       putElementAtKeyImp = (id(*)(id,SEL,elt,elt))
diff --git a/Source/objects/Collecting.h b/Source/objects/Collecting.h
index 91736d9f8..e2ca3c72d 100644
--- a/Source/objects/Collecting.h
+++ b/Source/objects/Collecting.h
@@ -112,11 +112,11 @@
 
 // COPYING 
 - emptyCopy;
-- emptyCopyAs: (id <Collecting>)aCollectionClass;
+- emptyCopyAs: (Class)aCollectionClass;
 - shallowCopy;
-- shallowCopyAs: (id <Collecting>)aCollectionClass;
+- shallowCopyAs: (Class)aCollectionClass;
 - copy;
-- copyAs: (id <Collecting>)aCollectionClass;
+- copyAs: (Class)aCollectionClass;
 - species;