1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-29 00:10:21 +02:00

Really fix inline machinery for MacOS X.

This commit is contained in:
Ludovic Courtès 2008-04-13 19:35:46 +02:00
parent 7dc9ae7179
commit 07db6fcd4c
2 changed files with 11 additions and 4 deletions

View file

@ -1,3 +1,9 @@
2008-04-13 Ludovic Courtès <ludo@gnu.org>
* inline.h (SCM_C_USE_EXTERN_INLINE): New macro. Use it to make
sure "extern" declarations are produced when "extern inline" is
used.
2008-04-10 Ludovic Courtès <ludo@gnu.org>
* inline.h (SCM_C_EXTERN_INLINE): Special-case Apple's GCC

View file

@ -55,6 +55,7 @@
inline" in that case. */
# if (defined __GNUC__) && (!(__APPLE_CC__ > 5400 && __STDC_VERSION__ >= 199901L))
# define SCM_C_USE_EXTERN_INLINE 1
# if (defined __GNUC_STDC_INLINE__) || (__GNUC__ == 4 && __GNUC_MINOR__ == 2)
# define SCM_C_EXTERN_INLINE \
extern __inline__ __attribute__ ((__gnu_inline__))
@ -68,12 +69,12 @@
#endif /* SCM_INLINE_C_INCLUDING_INLINE_H */
#if ((!defined SCM_C_INLINE) && (!defined SCM_INLINE_C_INCLUDING_INLINE_H)) \
|| (defined __GNUC__)
#if (!defined SCM_C_INLINE) || (defined SCM_INLINE_C_INCLUDING_INLINE_H) \
|| (defined SCM_C_USE_EXTERN_INLINE)
/* The `extern' declarations. They should only appear when used from
"inline.c", when `inline' is not supported at all or when GCC's "extern
inline" is used. */
"inline.c", when `inline' is not supported at all or when "extern inline"
is used. */
SCM_API SCM scm_cell (scm_t_bits car, scm_t_bits cdr);
SCM_API SCM scm_double_cell (scm_t_bits car, scm_t_bits cbr,