mirror of
https://github.com/gnustep/libs-steptalk.git
synced 2025-02-21 10:41:04 +00:00
c2c2d22254
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/steptalk/trunk@13642 72102866-910b-0410-8b05-ffd578937521
54 lines
808 B
Objective-C
54 lines
808 B
Objective-C
/**
|
|
STUndefinedObject.m
|
|
Wrapper for nil object
|
|
|
|
Copyright (c) 2002 Free Software Foundation
|
|
|
|
This file is part of the StepTalk project.
|
|
|
|
*/
|
|
#import "STUndefinedObject+additions.h"
|
|
|
|
#import "STBlock.h"
|
|
#import <StepTalk/STExterns.h>
|
|
|
|
#import <Foundation/NSString.h>
|
|
#import <Foundation/NSException.h>
|
|
|
|
@implementation STUndefinedObject(SmalltalkAdditions)
|
|
- (BOOL)isNil
|
|
{
|
|
return YES;
|
|
}
|
|
|
|
- ifNil:(STBlock *)block
|
|
{
|
|
return [block value];
|
|
}
|
|
|
|
- notNil:(STBlock *)block
|
|
{
|
|
return nil;
|
|
}
|
|
|
|
- ifFalse:(STBlock *)block
|
|
{
|
|
return [block value];
|
|
}
|
|
|
|
- ifTrue:(STBlock *)block
|
|
{
|
|
return nil;
|
|
}
|
|
|
|
- ifFalse:(STBlock *)block ifTrue:(STBlock *)anotherBlock
|
|
{
|
|
return [block value];
|
|
}
|
|
|
|
- ifTrue:(STBlock *)block ifFalse:(STBlock *)anotherBlock
|
|
{
|
|
return [anotherBlock value];
|
|
}
|
|
@end
|
|
|