(scm_init_guile_1): Call scm_i_init_discouraged.

This commit is contained in:
Marius Vollmer 2004-08-03 15:04:48 +00:00
commit 8672c728f0

View file

@ -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