diff options
| author | Giuseppe Scrivano <giuseppe@southpole.se> | 2012-02-21 15:55:44 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2012-03-07 21:25:11 +0100 |
| commit | 3658a3744bcc7c75db24143db1dae1bd13554515 (patch) | |
| tree | 24c50e5672d4ba4dfd58a37905003be8c6220a1a | |
| parent | 1fa0fde4955e39891142eb5d09bb195b37409937 (diff) | |
| download | guile-3658a3744bcc7c75db24143db1dae1bd13554515.tar.gz | |
Fix a segfault when /dev/urandom is not accessible
* libguile/init.c (scm_i_init_guile): Call `scm_init_random' before
`scm_init_macros'.
| -rw-r--r-- | libguile/init.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/init.c b/libguile/init.c index f171950fa..a08621182 100644 --- a/libguile/init.c +++ b/libguile/init.c @@ -444,7 +444,8 @@ scm_i_init_guile (void *base) scm_init_ioext (); scm_init_keywords (); /* Requires smob_prehistory */ scm_init_list (); - scm_init_macros (); /* Requires smob_prehistory */ + scm_init_random (); /* Requires smob_prehistory */ + scm_init_macros (); /* Requires smob_prehistory and random */ scm_init_mallocs (); /* Requires smob_prehistory */ scm_init_modules (); /* Requires smob_prehistory */ scm_init_numbers (); @@ -500,7 +501,6 @@ scm_i_init_guile (void *base) scm_init_eval_in_scheme (); scm_init_evalext (); scm_init_debug (); /* Requires macro smobs */ - scm_init_random (); /* Requires smob_prehistory */ scm_init_simpos (); #if HAVE_MODULES scm_init_dynamic_linking (); /* Requires smob_prehistory */ |