mirror of
https://github.com/gnustep/libs-base.git
synced 2025-04-25 17:51:01 +00:00
369c38280a
directly in source files because the config.h file is system dependent, used just for compiling the source, and should not be installed. Some minor bug fixes. git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@2619 72102866-910b-0410-8b05-ffd578937521
111 lines
2.7 KiB
Objective-C
111 lines
2.7 KiB
Objective-C
/* Implementation of NSMethodSignature for GNUStep
|
|
Copyright (C) 1994, 1995, 1996 Free Software Foundation, Inc.
|
|
|
|
Written by: Andrew Kachites McCallum <mccallum@gnu.ai.mit.edu>
|
|
Date: August 1994
|
|
|
|
This file is part of the GNUstep Base Library.
|
|
|
|
This library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later version.
|
|
|
|
This library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with this library; if not, write to the Free
|
|
Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*/
|
|
|
|
#include <config.h>
|
|
#include <gnustep/base/preface.h>
|
|
#include <Foundation/NSMethodSignature.h>
|
|
#include <Foundation/NSException.h>
|
|
#include <Foundation/NSString.h>
|
|
|
|
static int
|
|
types_get_size_of_arguments(const char *types)
|
|
{
|
|
const char* type = objc_skip_typespec (types);
|
|
return atoi (type);
|
|
}
|
|
|
|
static int
|
|
types_get_number_of_arguments (const char *types)
|
|
{
|
|
int i = 0;
|
|
const char* type = types;
|
|
while (*type)
|
|
{
|
|
type = objc_skip_argspec (type);
|
|
i += 1;
|
|
}
|
|
return i - 1;
|
|
}
|
|
|
|
@implementation NSMethodSignature
|
|
|
|
+ (NSMethodSignature*) signatureWithObjCTypes: (const char*)t
|
|
{
|
|
int len;
|
|
NSMethodSignature *newMs = [NSMethodSignature alloc];
|
|
len = strlen(t);
|
|
OBJC_MALLOC(newMs->types, char, len);
|
|
memcpy(newMs->types, t, len);
|
|
len = strlen(t); /* xxx */
|
|
OBJC_MALLOC(newMs->returnTypes, char, len);
|
|
memcpy(newMs->returnTypes, t, len);
|
|
newMs->returnTypes[len-1] = '\0';
|
|
newMs->argFrameLength = types_get_size_of_arguments(t);
|
|
newMs->returnFrameLength = objc_sizeof_type(t);
|
|
newMs->numArgs = types_get_number_of_arguments(t);
|
|
return newMs;
|
|
}
|
|
|
|
- (NSArgumentInfo) argumentInfoAtIndex: (unsigned)index
|
|
{
|
|
if (index >= numArgs)
|
|
[NSException raise:NSInvalidArgumentException
|
|
format:@"Index too high."];
|
|
[self notImplemented:_cmd];
|
|
return (NSArgumentInfo){0,0,""};
|
|
}
|
|
|
|
- (unsigned) frameLength
|
|
{
|
|
return argFrameLength;
|
|
}
|
|
|
|
- (BOOL) isOneway
|
|
{
|
|
[self notImplemented:_cmd];
|
|
return NO;
|
|
}
|
|
|
|
- (unsigned) methodReturnLength
|
|
{
|
|
return returnFrameLength;
|
|
}
|
|
|
|
- (char*) methodReturnType
|
|
{
|
|
return returnTypes;
|
|
}
|
|
|
|
- (unsigned) numberOfArguments
|
|
{
|
|
return numArgs;
|
|
}
|
|
|
|
- (void) dealloc
|
|
{
|
|
OBJC_FREE(types);
|
|
OBJC_FREE(returnTypes);
|
|
[super dealloc];
|
|
}
|
|
|
|
@end
|