39 |
#include "libguile/boolean.h" |
#include "libguile/boolean.h" |
40 |
#include "libguile/chars.h" |
#include "libguile/chars.h" |
41 |
#include "libguile/continuations.h" |
#include "libguile/continuations.h" |
|
#ifdef DEBUG_EXTENSIONS |
|
42 |
#include "libguile/debug.h" |
#include "libguile/debug.h" |
|
#endif |
|
43 |
#ifdef GUILE_DEBUG_MALLOC |
#ifdef GUILE_DEBUG_MALLOC |
44 |
#include "libguile/debug-malloc.h" |
#include "libguile/debug-malloc.h" |
45 |
#endif |
#endif |
137 |
scm_dynwinds = SCM_EOL; |
scm_dynwinds = SCM_EOL; |
138 |
SCM_DYNENV (scm_rootcont) = SCM_EOL; |
SCM_DYNENV (scm_rootcont) = SCM_EOL; |
139 |
SCM_THROW_VALUE (scm_rootcont) = SCM_EOL; |
SCM_THROW_VALUE (scm_rootcont) = SCM_EOL; |
|
#ifdef DEBUG_EXTENSIONS |
|
140 |
SCM_DFRAME (scm_rootcont) = scm_last_debug_frame = 0; |
SCM_DFRAME (scm_rootcont) = scm_last_debug_frame = 0; |
|
#endif |
|
141 |
SCM_BASE (scm_rootcont) = base; |
SCM_BASE (scm_rootcont) = base; |
142 |
} |
} |
143 |
|
|
499 |
scm_init_socket (); |
scm_init_socket (); |
500 |
#endif |
#endif |
501 |
scm_init_sort (); |
scm_init_sort (); |
|
#ifdef DEBUG_EXTENSIONS |
|
502 |
scm_init_srcprop (); |
scm_init_srcprop (); |
|
#endif |
|
503 |
scm_init_stackchk (); |
scm_init_stackchk (); |
504 |
scm_init_strings (); |
scm_init_strings (); |
505 |
scm_init_struct (); /* Requires strings */ |
scm_init_struct (); /* Requires strings */ |
521 |
scm_init_vports (); |
scm_init_vports (); |
522 |
scm_init_eval (); |
scm_init_eval (); |
523 |
scm_init_evalext (); |
scm_init_evalext (); |
|
#ifdef DEBUG_EXTENSIONS |
|
524 |
scm_init_debug (); /* Requires macro smobs */ |
scm_init_debug (); /* Requires macro smobs */ |
|
#endif |
|
525 |
scm_init_random (); |
scm_init_random (); |
526 |
#if SCM_HAVE_ARRAYS |
#if SCM_HAVE_ARRAYS |
527 |
scm_init_ramap (); |
scm_init_ramap (); |
530 |
scm_init_simpos (); |
scm_init_simpos (); |
531 |
scm_init_load_path (); |
scm_init_load_path (); |
532 |
scm_init_standard_ports (); /* Requires fports */ |
scm_init_standard_ports (); /* Requires fports */ |
|
#ifdef DYNAMIC_LINKING |
|
533 |
scm_init_dynamic_linking (); |
scm_init_dynamic_linking (); |
|
#endif |
|
534 |
#if SCM_ENABLE_ELISP |
#if SCM_ENABLE_ELISP |
535 |
scm_init_lang (); |
scm_init_lang (); |
536 |
#endif /* SCM_ENABLE_ELISP */ |
#endif /* SCM_ENABLE_ELISP */ |