summaryrefslogtreecommitdiff
path: root/libguile/inline.h
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2008-04-13 19:35:46 +0200
committerLudovic Courtès <ludo@gnu.org>2008-04-13 19:39:03 +0200
commit07db6fcd4cceca090c386ca0527e3762a81467cf (patch)
tree6a56375f78ae8af4a42d06c7f7af84f28ed07d4c /libguile/inline.h
parent7dc9ae7179b8b099897f8080b675e2a9c54d388c (diff)
downloadguile-07db6fcd4cceca090c386ca0527e3762a81467cf.tar.gz
Really fix inline machinery for MacOS X.
Diffstat (limited to 'libguile/inline.h')
-rw-r--r--libguile/inline.h9
1 files changed, 5 insertions, 4 deletions
diff --git a/libguile/inline.h b/libguile/inline.h
index 34bb84345..904ec50e4 100644
--- a/libguile/inline.h
+++ b/libguile/inline.h
@@ -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,