([InPort -init]): Set _packet_invocation.

([InPort -setPacketInvocation:]): New method.
([InPort -addToRunLoop:forMode:]): New method.
([InPort -removeFromRunLoop:forMode:]): New method.


git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@1106 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Andrew McCallum 1996-03-12 14:50:46 +00:00
parent 1400e225cd
commit c7560c1d06

View file

@ -104,6 +104,13 @@
@implementation InPort @implementation InPort
- init
{
[super init];
_packet_invocation = nil;
return self;
}
+ newForReceivingFromRegisteredName: (id <String>)name + newForReceivingFromRegisteredName: (id <String>)name
{ {
[self subclassResponsibility:_cmd]; [self subclassResponsibility:_cmd];
@ -121,6 +128,21 @@
return nil; return nil;
} }
- (void) setPacketInvocation: (id <Invoking>)invocation
{
_packet_invocation = invocation;
}
- (void) addToRunLoop: run_loop forMode: (id <String>)mode
{
[self subclassResponsibility:_cmd];
}
- (void) removeFromRunLoop: run_loop forMode: (id <String>)mode
{
[self subclassResponsibility:_cmd];
}
@end @end