diff options
author | Marius Vollmer <mvo@zagadka.de> | 2001-11-02 00:08:10 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2001-11-02 00:08:10 +0000 |
commit | e4e933734c267ff14e02f3ae721c06223803dd65 (patch) | |
tree | 4d50b9a64bd673f3f6462a675cd1841fe06951f1 | |
parent | 1174045c9ade5765b91d80d12af7f70b7744f305 (diff) | |
download | guile-e4e933734c267ff14e02f3ae721c06223803dd65.tar.gz |
Prefixed each each exported symbol with SCM_API.
-rw-r--r-- | libguile/alist.h | 34 | ||||
-rw-r--r-- | libguile/arbiters.h | 8 | ||||
-rw-r--r-- | libguile/async.h | 30 | ||||
-rw-r--r-- | libguile/backtrace.h | 18 | ||||
-rw-r--r-- | libguile/boolean.h | 6 |
5 files changed, 48 insertions, 48 deletions
diff --git a/libguile/alist.h b/libguile/alist.h index bf8b4562e..010802b5a 100644 --- a/libguile/alist.h +++ b/libguile/alist.h @@ -50,23 +50,23 @@ -extern SCM scm_acons (SCM w, SCM x, SCM y); -extern SCM scm_sloppy_assq (SCM x, SCM alist); -extern SCM scm_sloppy_assv (SCM x, SCM alist); -extern SCM scm_sloppy_assoc (SCM x, SCM alist); -extern SCM scm_assq (SCM x, SCM alist); -extern SCM scm_assv (SCM x, SCM alist); -extern SCM scm_assoc (SCM x, SCM alist); -extern SCM scm_assq_ref (SCM alist, SCM key); -extern SCM scm_assv_ref (SCM alist, SCM key); -extern SCM scm_assoc_ref (SCM alist, SCM key); -extern SCM scm_assq_set_x (SCM alist, SCM key, SCM val); -extern SCM scm_assv_set_x (SCM alist, SCM key, SCM val); -extern SCM scm_assoc_set_x (SCM alist, SCM key, SCM val); -extern SCM scm_assq_remove_x (SCM alist, SCM key); -extern SCM scm_assv_remove_x (SCM alist, SCM key); -extern SCM scm_assoc_remove_x (SCM alist, SCM key); -extern void scm_init_alist (void); +SCM_API SCM scm_acons (SCM w, SCM x, SCM y); +SCM_API SCM scm_sloppy_assq (SCM x, SCM alist); +SCM_API SCM scm_sloppy_assv (SCM x, SCM alist); +SCM_API SCM scm_sloppy_assoc (SCM x, SCM alist); +SCM_API SCM scm_assq (SCM x, SCM alist); +SCM_API SCM scm_assv (SCM x, SCM alist); +SCM_API SCM scm_assoc (SCM x, SCM alist); +SCM_API SCM scm_assq_ref (SCM alist, SCM key); +SCM_API SCM scm_assv_ref (SCM alist, SCM key); +SCM_API SCM scm_assoc_ref (SCM alist, SCM key); +SCM_API SCM scm_assq_set_x (SCM alist, SCM key, SCM val); +SCM_API SCM scm_assv_set_x (SCM alist, SCM key, SCM val); +SCM_API SCM scm_assoc_set_x (SCM alist, SCM key, SCM val); +SCM_API SCM scm_assq_remove_x (SCM alist, SCM key); +SCM_API SCM scm_assv_remove_x (SCM alist, SCM key); +SCM_API SCM scm_assoc_remove_x (SCM alist, SCM key); +SCM_API void scm_init_alist (void); #endif /* SCM_ALIST_H */ diff --git a/libguile/arbiters.h b/libguile/arbiters.h index 7cda145c7..c0d331515 100644 --- a/libguile/arbiters.h +++ b/libguile/arbiters.h @@ -50,10 +50,10 @@ -extern SCM scm_make_arbiter (SCM name); -extern SCM scm_try_arbiter (SCM arb); -extern SCM scm_release_arbiter (SCM arb); -extern void scm_init_arbiters (void); +SCM_API SCM scm_make_arbiter (SCM name); +SCM_API SCM scm_try_arbiter (SCM arb); +SCM_API SCM scm_release_arbiter (SCM arb); +SCM_API void scm_init_arbiters (void); #endif /* SCM_ARBITERS_H */ diff --git a/libguile/async.h b/libguile/async.h index ed2d7c416..7cdb81cd1 100644 --- a/libguile/async.h +++ b/libguile/async.h @@ -50,24 +50,24 @@ -extern unsigned int scm_mask_ints; +SCM_API unsigned int scm_mask_ints; -extern int scm_asyncs_pending (void); -extern void scm_async_click (void); -extern void scm_switch (void); -extern SCM scm_async (SCM thunk); -extern SCM scm_system_async (SCM thunk); -extern SCM scm_async_mark (SCM a); -extern SCM scm_system_async_mark (SCM a); -extern SCM scm_run_asyncs (SCM list_of_a); -extern SCM scm_noop (SCM args); -extern SCM scm_set_tick_rate (SCM n); -extern SCM scm_set_switch_rate (SCM n); -extern SCM scm_unmask_signals (void); -extern SCM scm_mask_signals (void); -extern void scm_init_async (void); +SCM_API int scm_asyncs_pending (void); +SCM_API void scm_async_click (void); +SCM_API void scm_switch (void); +SCM_API SCM scm_async (SCM thunk); +SCM_API SCM scm_system_async (SCM thunk); +SCM_API SCM scm_async_mark (SCM a); +SCM_API SCM scm_system_async_mark (SCM a); +SCM_API SCM scm_run_asyncs (SCM list_of_a); +SCM_API SCM scm_noop (SCM args); +SCM_API SCM scm_set_tick_rate (SCM n); +SCM_API SCM scm_set_switch_rate (SCM n); +SCM_API SCM scm_unmask_signals (void); +SCM_API SCM scm_mask_signals (void); +SCM_API void scm_init_async (void); #endif /* SCM_ASYNC_H */ diff --git a/libguile/backtrace.h b/libguile/backtrace.h index 0c0b7417b..482488da5 100644 --- a/libguile/backtrace.h +++ b/libguile/backtrace.h @@ -51,19 +51,19 @@ #include "libguile/__scm.h" -extern SCM scm_the_last_stack_fluid_var; +SCM_API SCM scm_the_last_stack_fluid_var; -void scm_display_error_message (SCM message, SCM args, SCM port); -void scm_i_display_error (SCM stack, SCM port, SCM subr, SCM message, SCM args, SCM rest); -SCM scm_display_error (SCM stack, SCM port, SCM subr, SCM message, SCM args, SCM rest); -SCM scm_display_application (SCM frame, SCM port, SCM indent); -SCM scm_display_backtrace (SCM stack, SCM port, SCM first, SCM depth); -SCM scm_backtrace (void); +SCM_API void scm_display_error_message (SCM message, SCM args, SCM port); +SCM_API void scm_i_display_error (SCM stack, SCM port, SCM subr, SCM message, SCM args, SCM rest); +SCM_API SCM scm_display_error (SCM stack, SCM port, SCM subr, SCM message, SCM args, SCM rest); +SCM_API SCM scm_display_application (SCM frame, SCM port, SCM indent); +SCM_API SCM scm_display_backtrace (SCM stack, SCM port, SCM first, SCM depth); +SCM_API SCM scm_backtrace (void); #ifdef GUILE_DEBUG -SCM scm_set_print_params_x (SCM params); +SCM_API SCM scm_set_print_params_x (SCM params); #endif -void scm_init_backtrace (void); +SCM_API void scm_init_backtrace (void); #endif /* SCM_BACKTRACE_H */ diff --git a/libguile/boolean.h b/libguile/boolean.h index a4328fd48..907873e8d 100644 --- a/libguile/boolean.h +++ b/libguile/boolean.h @@ -73,9 +73,9 @@ -extern SCM scm_not (SCM x); -extern SCM scm_boolean_p (SCM obj); -extern void scm_init_boolean (void); +SCM_API SCM scm_not (SCM x); +SCM_API SCM scm_boolean_p (SCM obj); +SCM_API void scm_init_boolean (void); #endif /* SCM_BOOLEAN_H */ |