diff options
| author | Marius Vollmer <mvo@zagadka.de> | 2004-08-03 15:04:48 +0000 |
|---|---|---|
| committer | Marius Vollmer <mvo@zagadka.de> | 2004-08-03 15:04:48 +0000 |
| commit | 8672c728f0eac55444097c333fb4675eb6dde368 (patch) | |
| tree | d12e59593ecca8fd0f89322b6cbcf7ac63f9703b /libguile | |
| parent | 55f26379b337e51e734ccd5bd9ad935cdc9b33a0 (diff) | |
| download | guile-8672c728f0eac55444097c333fb4675eb6dde368.tar.gz | |
(scm_init_guile_1): Call scm_i_init_discouraged.
Diffstat (limited to 'libguile')
| -rw-r--r-- | libguile/init.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/libguile/init.c b/libguile/init.c index 89f47ea9a..9e09e2587 100644 --- a/libguile/init.c +++ b/libguile/init.c @@ -118,6 +118,7 @@ #include "libguile/weaks.h" #include "libguile/guardians.h" #include "libguile/extensions.h" +#include "libguile/discouraged.h" #include "libguile/deprecated.h" #include "libguile/init.h" @@ -537,6 +538,10 @@ scm_init_guile_1 (SCM_STACKITEM *base) scm_init_goops (); +#if SCM_ENABLE_DISCOURAGED == 1 + scm_i_init_discouraged (); +#endif + #if SCM_ENABLE_DEPRECATED == 1 scm_i_init_deprecated (); #endif |