55 |
#ifdef HAVE_INLINE |
#ifdef HAVE_INLINE |
56 |
|
|
57 |
static inline SCM |
static inline SCM |
58 |
scm_alloc_cell (scm_t_bits car, scm_t_bits cdr) |
scm_cell (scm_t_bits car, scm_t_bits cdr) |
59 |
{ |
{ |
60 |
SCM z; |
SCM z; |
61 |
|
|
102 |
} |
} |
103 |
|
|
104 |
static inline SCM |
static inline SCM |
105 |
scm_alloc_double_cell (scm_t_bits car, scm_t_bits cbr, |
scm_double_cell (scm_t_bits car, scm_t_bits cbr, |
106 |
scm_t_bits ccr, scm_t_bits cdr) |
scm_t_bits ccr, scm_t_bits cdr) |
107 |
{ |
{ |
108 |
SCM z; |
SCM z; |
109 |
|
|
153 |
|
|
154 |
#else /* !HAVE_INLINE */ |
#else /* !HAVE_INLINE */ |
155 |
|
|
156 |
SCM_API SCM scm_alloc_cell (scm_t_bits car, scm_t_bits cdr); |
SCM_API SCM scm_cell (scm_t_bits car, scm_t_bits cdr); |
157 |
SCM_API SCM scm_alloc_double_cell (scm_t_bits car, scm_t_bits cbr, |
SCM_API SCM scm_double_cell (scm_t_bits car, scm_t_bits cbr, |
158 |
scm_t_bits ccr, scm_t_bits cdr); |
scm_t_bits ccr, scm_t_bits cdr); |
159 |
|
|
160 |
#endif |
#endif |
161 |
|
|