mirror of
https://github.com/darlinghq/darling-libobjc2.git
synced 2024-11-27 14:10:33 +00:00
53 lines
1.4 KiB
Objective-C
53 lines
1.4 KiB
Objective-C
#import "objc/runtime.h"
|
|
#import "class.h"
|
|
#import "lock.h"
|
|
#import "objc/blocks_runtime.h"
|
|
#import "dtable.h"
|
|
#include <assert.h>
|
|
|
|
struct objc_class _NSConcreteGlobalBlock;
|
|
struct objc_class _NSConcreteStackBlock;
|
|
struct objc_class _NSConcreteMallocBlock;
|
|
|
|
static struct objc_class _NSConcreteGlobalBlockMeta;
|
|
static struct objc_class _NSConcreteStackBlockMeta;
|
|
static struct objc_class _NSConcreteMallocBlockMeta;
|
|
|
|
static struct objc_class _NSBlock;
|
|
static struct objc_class _NSBlockMeta;
|
|
|
|
static void createNSBlockSubclass(Class superclass, Class newClass,
|
|
Class metaClass, char *name)
|
|
{
|
|
// Initialize the metaclass
|
|
//metaClass->class_pointer = superclass->class_pointer;
|
|
//metaClass->super_class = superclass->class_pointer;
|
|
metaClass->info = objc_class_flag_meta;
|
|
metaClass->dtable = uninstalled_dtable;
|
|
|
|
// Set up the new class
|
|
newClass->isa = metaClass;
|
|
newClass->super_class = (Class)superclass->name;
|
|
newClass->name = name;
|
|
newClass->info = objc_class_flag_class;
|
|
newClass->dtable = uninstalled_dtable;
|
|
|
|
LOCK_RUNTIME_FOR_SCOPE();
|
|
class_table_insert(newClass);
|
|
|
|
}
|
|
|
|
#define NEW_CLASS(super, sub) \
|
|
createNSBlockSubclass(super, &sub, &sub ## Meta, #sub)
|
|
|
|
BOOL objc_create_block_classes_as_subclasses_of(Class super)
|
|
{
|
|
if (_NSBlock.super_class != NULL) { return NO; }
|
|
|
|
NEW_CLASS(super, _NSBlock);
|
|
NEW_CLASS(&_NSBlock, _NSConcreteStackBlock);
|
|
NEW_CLASS(&_NSBlock, _NSConcreteGlobalBlock);
|
|
NEW_CLASS(&_NSBlock, _NSConcreteMallocBlock);
|
|
return YES;
|
|
}
|