(MU_SCM_SYMBOL_VALUE): New define
(_mu_scm_mailer,_mu_scm_debug): Removed externs.
Showing
1 changed file
with
3 additions
and
3 deletions
... | @@ -33,9 +33,12 @@ | ... | @@ -33,9 +33,12 @@ |
33 | # define scm_primitive_eval_x scm_eval_x | 33 | # define scm_primitive_eval_x scm_eval_x |
34 | # define scm_i_big2dbl scm_big2dbl | 34 | # define scm_i_big2dbl scm_big2dbl |
35 | # define scm_c_eval_string scm_eval_0str | 35 | # define scm_c_eval_string scm_eval_0str |
36 | # define MU_SCM_SYMBOL_VALUE(p) scm_symbol_value0(p) | ||
36 | 37 | ||
37 | extern SCM scm_long2num (long val); | 38 | extern SCM scm_long2num (long val); |
38 | 39 | ||
40 | #else | ||
41 | # define MU_SCM_SYMBOL_VALUE(p) SCM_VARIABLE_REF(scm_c_lookup(p)) | ||
39 | #endif | 42 | #endif |
40 | 43 | ||
41 | typedef struct | 44 | typedef struct |
... | @@ -51,9 +54,6 @@ typedef struct | ... | @@ -51,9 +54,6 @@ typedef struct |
51 | void *data; | 54 | void *data; |
52 | } guimb_param_t; | 55 | } guimb_param_t; |
53 | 56 | ||
54 | extern SCM _mu_scm_mailer; | ||
55 | extern SCM _mu_scm_debug; | ||
56 | |||
57 | #ifdef __cplusplus | 57 | #ifdef __cplusplus |
58 | extern "C" { | 58 | extern "C" { |
59 | #endif | 59 | #endif | ... | ... |
-
Please register or sign in to post a comment