remove some unused code

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@39494 72102866-910b-0410-8b05-ffd578937521

Source/GSFFIInvocation.m

@@ -58,29 +58,6 @@ typedef void (*f_fun) ();
 
 static void GSFFIInvocationCallback(ffi_cif*, void*, void **, void*);
 
-/*
- * If we are using the GNU ObjC runtime we could simplify this
- * function quite a lot because this function is already present in
- * the ObjC runtime.  However, it is not part of the public API, so we
- * work around it.
- */
-
-GS_STATIC_INLINE GSMethod
-gs_method_for_receiver_and_selector (id receiver, SEL sel)
-{
-  if (receiver)
-    {
-      return GSGetMethod((GSObjCIsInstance(receiver)
-                          ? object_getClass(receiver) : (Class)receiver),
-                         sel,
-                         GSObjCIsInstance(receiver),
-                         YES);
-    }
-
-  return 0;
-}
-
-
 /* This routine should return a typed selector corresponding to the
    name of the specified selector.  If there is only one type, then we
    can safely return that typed selector.  If not, then we can not be

Source/NSString.m

@@ -495,14 +495,6 @@ static unsigned rootOf(NSString *s, unsigned l)
 }
 
 
-/* Convert a high-low surrogate pair into Unicode scalar code-poNSInteger*/
-static inline uint32_t
-surrogatePairValue(unichar high, unichar low)
-{
-  return ((high - (unichar)0xD800) * (unichar)400)
-    + ((low - (unichar)0xDC00) + (unichar)10000);
-}
-
 @implementation NSString
 //  NSString itself is an abstract class which provides factory
 //  methods to generate objects of unspecified subclasses.

Source/NSZone.m

@@ -720,12 +720,6 @@ chunkSize(ff_block* ptr)
   return ptr->size & ~SIZE_BITS;
 }
 
-static inline void
-chunkClrInUse(ff_block* ptr)
-{
-  ptr->size &= ~INUSE;
-}
-
 static inline size_t
 chunkClrLive(ff_block* ptr)
 {