Improve guile building.
[minipack.git] / patches / guile / 01-work-around-cross-gcc4-bug.patch
blob750e1a81f3400bac839e396497ee91fced5f53da
1 diff -ru guile-1.8.5-orig/libguile/gc-freelist.c guile-1.8.5/libguile/gc-freelist.c
2 --- guile-1.8.5-orig/libguile/gc-freelist.c 2008-05-04 18:39:48.000000000 -0300
3 +++ guile-1.8.5/libguile/gc-freelist.c 2008-10-15 18:27:21.000000000 -0300
4 @@ -23,8 +23,8 @@
5 #include "libguile/deprecation.h"
6 #include "libguile/private-gc.h"
8 -scm_t_cell_type_statistics scm_i_master_freelist;
9 -scm_t_cell_type_statistics scm_i_master_freelist2;
10 +scm_t_cell_type_statistics scm_i_master_freelist={};
11 +scm_t_cell_type_statistics scm_i_master_freelist2={};
15 diff -ru guile-1.8.5-orig/libguile/gdbint.c guile-1.8.5/libguile/gdbint.c
16 --- guile-1.8.5-orig/libguile/gdbint.c 2008-04-07 18:30:03.000000000 -0300
17 +++ guile-1.8.5/libguile/gdbint.c 2008-10-15 08:22:12.000000000 -0300
18 @@ -92,11 +92,11 @@
20 char *gdb_language = "lisp/c";
22 -SCM gdb_result;
23 +SCM gdb_result=0;
25 -char *gdb_output;
26 +char *gdb_output=0;
28 -int gdb_output_length;
29 +int gdb_output_length=0;
31 int scm_print_carefully_p;
33 diff -ru guile-1.8.5-orig/libguile/threads.c guile-1.8.5/libguile/threads.c
34 --- guile-1.8.5-orig/libguile/threads.c 2008-05-04 18:39:48.000000000 -0300
35 +++ guile-1.8.5/libguile/threads.c 2008-10-15 18:30:28.000000000 -0300
36 @@ -1642,7 +1642,7 @@
38 /*** Initialization */
40 -scm_i_pthread_key_t scm_i_freelist, scm_i_freelist2;
41 +scm_i_pthread_key_t scm_i_freelist={}, scm_i_freelist2={};
42 scm_i_pthread_mutex_t scm_i_misc_mutex;
44 #if SCM_USE_PTHREAD_THREADS