libs-base/Source/NSObjCRuntime.m
Richard Frith-MacDonald be3ff6a3e3 Rewrite of invocation code with new mframe code.
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@2930 72102866-910b-0410-8b05-ffd578937521
1998-08-13 20:45:32 +00:00

72 lines
2 KiB
Objective-C

/* Implementation of ObjC runtime for GNUStep
Copyright (C) 1995 Free Software Foundation, Inc.
Written by: Andrew Kachites McCallum <mccallum@gnu.ai.mit.edu>
Date: Aug 1995
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/NSObjCRuntime.h>
#include <Foundation/NSString.h>
#include <gnustep/base/mframe.h>
NSString *
NSStringFromSelector(SEL aSelector)
{
if (aSelector != (SEL)0)
return [NSString stringWithCString: (char*)sel_get_name(aSelector)];
return nil;
}
SEL
NSSelectorFromString(NSString *aSelectorName)
{
if (aSelectorName != nil)
return sel_get_any_uid ([aSelectorName cString]);
return (SEL)0;
}
Class
NSClassFromString(NSString *aClassName)
{
if (aClassName != nil)
return objc_lookup_class ([aClassName cString]);
return (Class)0;
}
NSString *
NSStringFromClass(Class aClass)
{
if (aClass != (Class)0)
return [NSString stringWithCString: (char*)class_get_class_name(aClass)];
return nil;
}
const char *
NSGetSizeAndAlignment(const char *typePtr, unsigned *sizep, unsigned *alignp)
{
NSArgumentInfo info;
typePtr = mframe_next_arg(typePtr, &info);
if (sizep)
*sizep = info.size;
if (alignp)
*alignp = info.align;
}