forked from pmougin/F-Script
-
Notifications
You must be signed in to change notification settings - Fork 8
/
Copy pathFSCNBinaryMessage.m
46 lines (37 loc) · 1.08 KB
/
FSCNBinaryMessage.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
/* FSCNBinaryMessage.m Copyright (c) 2008-2009 Philippe Mougin. */
/* This software is open source. See the license. */
#import "FSCNBinaryMessage.h"
@implementation FSCNBinaryMessage
- (void)dealloc
{
[argument release];
[super dealloc];
}
- (void)encodeWithCoder:(NSCoder *)coder
{
[super encodeWithCoder:coder];
[coder encodeObject:argument forKey:@"argument"];
}
- (id)initWithCoder:(NSCoder *)coder
{
self = [super initWithCoder:coder];
nodeType = BINARY_MESSAGE;
argument = [[coder decodeObjectForKey:@"argument"] retain];
return self;
}
- (id)initWithReceiver:(FSCNBase *)theReceiver selectorString:(NSString *)theSelectorString pattern:(FSPattern *)thePattern argument:(FSCNBase *)theArgument
{
self = [super initWithReceiver:theReceiver selectorString:theSelectorString pattern:thePattern];
if (self != nil)
{
nodeType = BINARY_MESSAGE;
argument = [theArgument retain];
}
return self;
}
- (void)translateCharRange:(int32_t)translation
{
[super translateCharRange:translation];
[argument translateCharRange:translation];
}
@end