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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
/** Implementation of GSBlocks for GNUStep
Copyright (C) 2011 Free Software Foundation, Inc.
This file is part of the GNUstep Base Library.
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., 31 Milk Street #960789 Boston, MA 02196 USA.
*/
#import "Foundation/NSObject.h"
@interface GSBlock : NSObject
@end
@implementation GSBlock
+ (void) load
{
unsigned int methodCount;
Method *m = NULL;
Method *methods = class_copyMethodList(self, &methodCount);
id blockClass = objc_lookUpClass("_NSBlock");
Protocol *nscopying = NULL;
/* If we don't have an _NSBlock class, we don't have blocks support in the
* runtime, so give up.
*/
if (nil == blockClass)
{
return;
}
/* Copy all of the methods in this class onto the block-runtime-provided
* _NSBlock
*/
for (m = methods; NULL != *m; m++)
{
class_addMethod(blockClass, method_getName(*m),
method_getImplementation(*m), method_getTypeEncoding(*m));
}
nscopying = objc_getProtocol("NSCopying");
class_addProtocol(blockClass, nscopying);
free(methods);
}
- (id) copyWithZone: (NSZone*)aZone
{
return _Block_copy(self);
}
- (id) copy
{
return _Block_copy(self);
}
- (id) retain
{
return _Block_copy(self);
}
- (oneway void) release
{
_Block_release(self);
}
@end
|
