mirror of
https://github.com/gnustep/libs-base.git
synced 2025-06-01 17:12:03 +00:00
0ae9c7d32a
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@35004 72102866-910b-0410-8b05-ffd578937521
98 lines
2.7 KiB
C
98 lines
2.7 KiB
C
/** Definitions for block support 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
|
|
Library 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., 51 Franklin Street, Fifth Floor,
|
|
Boston, MA 02111 USA.
|
|
|
|
*/
|
|
|
|
#ifndef __GSBlocks_h_GNUSTEP_BASE_INCLUDE
|
|
#define __GSBlocks_h_GNUSTEP_BASE_INCLUDE
|
|
|
|
/* Define the has_feature pseudo-macro for GCC. */
|
|
#ifndef __has_feature
|
|
#define __has_feature(x) 0
|
|
#endif
|
|
|
|
#if __has_feature(blocks)
|
|
|
|
#define BLOCK_SCOPE __block
|
|
/**
|
|
* Defines a block type. Will work whether or not the compiler natively
|
|
* supports blocks.
|
|
*/
|
|
#define DEFINE_BLOCK_TYPE(name, retTy, argTys, ...) \
|
|
typedef retTy(^name)(argTys, ## __VA_ARGS__)
|
|
|
|
#define DEFINE_BLOCK_TYPE_NO_ARGS(name, retTy) \
|
|
typedef retTy(^name)()
|
|
|
|
/**
|
|
* Calls a block. Works irrespective of whether the compiler supports blocks.
|
|
*/
|
|
#define CALL_BLOCK(block, args, ...) block(args, ## __VA_ARGS__)
|
|
|
|
/**
|
|
* Calls a block without arguments.
|
|
*/
|
|
#define CALL_BLOCK_NO_ARGS(block) block()
|
|
#else
|
|
|
|
/* Fall-back versions for when the compiler doesn't have native blocks support.
|
|
*/
|
|
#if (GCC_VERSION >= 3000)
|
|
|
|
#define DEFINE_BLOCK_TYPE(name, retTy, argTys, ...) \
|
|
typedef struct {\
|
|
void *isa;\
|
|
int flags;\
|
|
int reserved;\
|
|
retTy (*invoke)(void*, argTys, ## __VA_ARGS__);\
|
|
} *name
|
|
|
|
#define CALL_BLOCK(block, args, ...) block->invoke(block, args, ## __VA_ARGS__)
|
|
|
|
#define CALL_BLOCK_NO_ARGS(block) block->invoke()
|
|
|
|
#else /* GCC_VERSION >= 3000 */
|
|
|
|
#define DEFINE_BLOCK_TYPE(name, retTy, argTys, args...) \
|
|
typedef struct {\
|
|
void *isa;\
|
|
int flags;\
|
|
int reserved;\
|
|
retTy (*invoke)(void*, argTys, args);\
|
|
} *name
|
|
|
|
#define DEFINE_BLOCK_TYPE_NO_ARGS(name, retTy) \
|
|
typedef struct {\
|
|
void *isa;\
|
|
int flags;\
|
|
int reserved;\
|
|
retTy (*invoke)(void*);\
|
|
} *name
|
|
|
|
|
|
#define CALL_BLOCK(block, args...) block->invoke(block, args)
|
|
#define CALL_BLOCK_NO_ARGS(block) block->invoke(block)
|
|
#define BLOCK_SCOPE
|
|
#endif /* GCC_VERSION >= 3000 */
|
|
|
|
#endif /* __has_feature(blocks) */
|
|
|
|
#endif /* __GSBlocks_h_GNUSTEP_BASE_INCLUDE */
|
|
|