forked from pmougin/F-Script
-
Notifications
You must be signed in to change notification settings - Fork 8
/
Copy pathFSReturnSignal.m
63 lines (52 loc) · 1.32 KB
/
FSReturnSignal.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
/* FSReturnSignal.m Copyright (c) 2006 Philippe Mougin. */
/* This software is open source. See the license. */
#import "FSReturnSignal.h"
@implementation FSReturnSignal
+ (FSReturnSignal *)returnSignalWithBlock:(FSBlock *)theBlock result:(id)theResult
{
return [[[self alloc] initWithBlock:theBlock result:(id)theResult] autorelease];
}
+ (FSReturnSignal *)returnSignalWithSymbolTable:(FSSymbolTable *)theSymbolTable result:(id)theResult
{
return [[[self alloc] initWithSymbolTable:theSymbolTable result:(id)theResult] autorelease];
}
- (FSBlock *)block
{
return block;
}
- (void) dealloc
{
[block release];
[symbolTable release];
[result release];
[super dealloc];
}
- (FSReturnSignal *)initWithBlock:(FSBlock *)theBlock result:(id)theResult
{
self = [super initWithName:@"FSReturnSignal" reason:@"" userInfo:nil];
if (self != nil)
{
block = [theBlock retain];
result = [theResult retain];
}
return self;
}
- (FSReturnSignal *) initWithSymbolTable:(FSSymbolTable *)theSymbolTable result:(id)theResult
{
self = [super initWithName:@"FSReturnSignal" reason:@"" userInfo:nil];
if (self != nil)
{
symbolTable = [theSymbolTable retain];
result = [theResult retain];
}
return self;
}
- (id) result
{
return result;
}
- (FSSymbolTable *)symbolTable
{
return symbolTable;
}
@end