From 4f35f460c056ce4d20201d4e8fe75352a587fde2 Mon Sep 17 00:00:00 2001
From: richard <richard@72102866-910b-0410-8b05-ffd578937521>
Date: Wed, 15 Jul 1998 12:51:29 +0000
Subject: [PATCH] Obsolete - replaced by other files.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@2851 72102866-910b-0410-8b05-ffd578937521
---
 Testing/invocation2.m | 158 ------------------------------------------
 1 file changed, 158 deletions(-)
 delete mode 100644 Testing/invocation2.m

diff --git a/Testing/invocation2.m b/Testing/invocation2.m
deleted file mode 100644
index 3af039ad6..000000000
--- a/Testing/invocation2.m
+++ /dev/null
@@ -1,158 +0,0 @@
-#include <Foundation/NSMethodSignature.h>
-#include <Foundation/NSInvocation.h>
-#include <Foundation/NSString.h>
-#include <gnustep/base/Invocation.h>
-
-struct intpair {
-  int i;
-  int j;
-};
-
-@interface IntPair: NSObject
-- (int)member:(Class)c;
-- (int)plus: (struct intpair) pair;
-- (int)plus_ptr: (struct intpair*) pair_ptr;
-@end
-
-@implementation  IntPair
-- (int)member:(Class)c
-{
-  if ([self class] == c)
-    return YES;
-  else
-    return NO;
-}
-- (int)plus: (struct intpair) pair
-{
-  return (pair.i + pair.j);
-}
-- (int)plus_ptr: (struct intpair*) pair_ptr
-{
-  return (pair_ptr->i + pair_ptr->j);
-}
-@end
-/* Invocation.m
-- initWithTarget: target selector: (SEL)s, ...
-[1] Adding CASE_TYPE(_C_CLASS, Class);
-[2] Adding default: block
-
-   NSInvocation.h
-[3] Adding NS_INVOCATION
-[4] Adding NS_MESSAGE
-
-   NSMethodSignature.m
-[5] Modifiying -(NSArgumentInfo)argumentInfoAtIndex:(unsigned)index */	
-
-void test1();
-void test2();
-void test3();
-void test4();
-void test5();
-
-int
-main ()
-{
-  test1();
-  test2();
-  test3();
-  test4();
-  test5();
-}
-
-void
-test1()
-{
-  IntPair * ipair = [IntPair  new];	
-  SEL sel = @selector(member:);
-  Class c = [IntPair class];
-  Invocation * inv;
-  int result;
-  inv = [[MethodInvocation alloc] 
-	  initWithTarget: ipair
-	  selector: sel, c];
-  [inv invoke];
-  [inv getReturnValue: &result];
-  fprintf(stderr, "test1 YES == %s\n", result? "YES": "NO");
-}
-
-void 
-test2()
-{
-  IntPair * ipair = [IntPair  new];	
-  SEL sel = @selector(plus:);
-  SEL sel_ptr = @selector(plus_ptr:);
-  struct intpair pair0;
-  struct intpair * pair0_ptr;
-  Invocation * inv;
-  int result;
-
-  pair0.i = 3;
-  pair0.j = 4;
-
-  inv = [[MethodInvocation alloc] 
-	  initWithTarget: ipair
-	  selector: sel, &pair0];
-  [inv invoke];
-  [inv getReturnValue: &result];
-  fprintf(stderr, "test2-1 %d == 7\n", result);
-
-  pair0_ptr = &pair0;
-  pair0_ptr->i = 2;
-  pair0_ptr->j = 3;
-  inv = [[MethodInvocation alloc] 
-	  initWithTarget: ipair
-	  selector: sel, &pair0];
-  [inv invoke];
-  [inv getReturnValue: &result];
-  fprintf(stderr, "test2-2 %d == 5\n", result);  
-}
-     
-void
-test3()
-{
-  IntPair * ipair = [IntPair  new];	
-  struct intpair pair0;
-  NSInvocation * inv;
-  int x;
-  pair0.i = 1;
-  pair0.j = 2;
-  inv = NS_INVOCATION(IntPair , 
-		      @selector(plus:), 
-		      &pair0);
-  [inv setTarget: ipair];
-  [inv invoke];
-  [inv getReturnValue: &x];
-  fprintf(stderr, "test3 3 == %d\n", x);
-}
-
-void
-test4()
-{
-  IntPair * ipair = [IntPair  new];	
-  struct intpair pair0;
-  NSInvocation * inv;
-  int x;
-  pair0.i = 3;
-  pair0.j = 8;
-  inv = NS_MESSAGE(ipair , 
-		   @selector(plus:), 
-		   &pair0);
-  [inv invoke];
-  [inv getReturnValue: &x];
-  fprintf(stderr, "test4 11 == %d\n", x);
-}
-
-void
-test5()
-{
-  NSObject * 	foo	 = [NSObject  new];	
-  NSArgumentInfo info;
-  SEL sel = @selector(isKindOfClass:);
-  NSMethodSignature * ms = [foo methodSignatureForSelector: sel];
-  info = [ms argumentInfoAtIndex: 0];
-  fprintf(stderr, "test5 (%d, %d, %s)\n", info.offset, info.size, info.type);
-  info = [ms argumentInfoAtIndex: 1];
-  fprintf(stderr, "test5 (%d, %d, %s)\n", info.offset, info.size, info.type);
-  info = [ms argumentInfoAtIndex: 2];
-  fprintf(stderr, "test5 (%d, %d, %s)\n", info.offset, info.size, info.type);  
-}