diff --git a/Frameworks/StepTalk/GNUmakefile b/Frameworks/StepTalk/GNUmakefile index eac54ea..8cdbae4 100644 --- a/Frameworks/StepTalk/GNUmakefile +++ b/Frameworks/StepTalk/GNUmakefile @@ -48,7 +48,7 @@ StepTalk_OBJC_FILES = \ STUndefinedObject.m \ NSNumber+additions.m \ NSObject+additions.m \ - SteptalkScriptingInfo.m + StepTalkScriptingInfo.m STEPTALK_HEADER_FILES = \ STBundleInfo.h \ diff --git a/Frameworks/StepTalk/STScriptObject.h b/Frameworks/StepTalk/STScriptObject.h index 25a2edf..093a4fd 100644 --- a/Frameworks/StepTalk/STScriptObject.h +++ b/Frameworks/StepTalk/STScriptObject.h @@ -12,6 +12,7 @@ NSMutableDictionary *ivars; NSMutableDictionary *methods; } ++ scriptObject; - initWithInstanceVariableNames:(NSString *)names; - (void)setObject:(id)anObject forVariable:(NSString *)aName; diff --git a/Frameworks/StepTalk/STScriptObject.m b/Frameworks/StepTalk/STScriptObject.m index 5c58b8f..b43ec2c 100644 --- a/Frameworks/StepTalk/STScriptObject.m +++ b/Frameworks/StepTalk/STScriptObject.m @@ -3,14 +3,23 @@ #import "STScriptObject.h" @implementation STScriptObject -- initWithInstanceVariableNames:(NSString *)names +/** Return new instance of script object without any instance variables */ ++ scriptObject +{ + return AUTORELEASE([[self alloc] init]); +} +- init { self = [super init]; - + methods = [[NSMutableDictionary alloc] init]; - + return self; } +- initWithInstanceVariableNames:(NSString *)names +{ + return [self init]; +} - (void)dealloc { RELEASE(methods); @@ -20,16 +29,16 @@ - (void)setObject:(id)anObject forVariable:(NSString *)aName { - [self _notImplemented:_cmd]; + [self notImplemented:_cmd]; } - (id)objectForVariable:(NSString *)aName { - [self _notImplemented:_cmd]; + [self notImplemented:_cmd]; } - (NSArray *)instanceVariableNames { - [self _notImplemented:_cmd]; + return [ivars allKeys]; } - (void)addMethod:(STMethod *)aMethod @@ -42,7 +51,7 @@ } - (void)removeMethod:(STMethod *)aMethod { - [self _notImplemented:_cmd]; + [self notImplemented:_cmd]; } - (void)removeMethodWithName:(NSString *)aName { diff --git a/Frameworks/StepTalk/ScriptingInfo.plist b/Frameworks/StepTalk/ScriptingInfo.plist new file mode 100644 index 0000000..764b7a4 --- /dev/null +++ b/Frameworks/StepTalk/ScriptingInfo.plist @@ -0,0 +1,13 @@ +{ + ScriptingInfoClass = StepTalkScriptingInfo; + + Classes = ( + STEnvironment, + STLanguage, + STScript, + STScriptsManager, + STBundleInfo, + STEngine, + STScriptObject + ); +} diff --git a/Frameworks/StepTalk/StepTalkScriptingInfo.h b/Frameworks/StepTalk/StepTalkScriptingInfo.h new file mode 100644 index 0000000..27eacb1 --- /dev/null +++ b/Frameworks/StepTalk/StepTalkScriptingInfo.h @@ -0,0 +1,32 @@ +/** + StepTalkScriptingInfo.h + Module to bring StepTalk classes + + Copyright (c) 2002 Free Software Foundation + + Written by: Stefan Urbanek + Date: 2002 Jun 18 + + This file is part of the StepTalk project. + + This library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser 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 + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with this library; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + + */ + +#import + +@interface StepTalkScriptingInfo:NSObject +@end + diff --git a/Frameworks/StepTalk/StepTalkScriptingInfo.m b/Frameworks/StepTalk/StepTalkScriptingInfo.m new file mode 100644 index 0000000..8fb1d0d --- /dev/null +++ b/Frameworks/StepTalk/StepTalkScriptingInfo.m @@ -0,0 +1,38 @@ +/** + StepTalkScriptingInfo. + Module to bring StepTalk classes + + Copyright (c) 2002 Free Software Foundation + + Written by: Stefan Urbanek + Date: 2002 Jun 18 + + This file is part of the StepTalk project. + + This library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser 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 + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with this library; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + + */ + +#import "StepTalkScriptingInfo.h" + +@class NSDictionary; + +@implementation StepTalkScriptingInfo ++ (NSDictionary *)namedObjectsForScripting +{ + return nil; +} +@end +