1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00

Warning fixes from Greg Harvey:

* unif.c (scm_array_set_x): initializer for pos
* throw.c (scm_ithrow): added initializer for jmpbuf (SCM_UNDEFINED)
* struct.c (scm_struct_ref, scm_struct_set_x): Added
initializers for field_type, since EGCS so desparately wants to
play dumb
* debug.h (scm_make_gloc, scm_gloc_p, scm_make_iloc, scm_memcons,
scm_mem_to_proc, scm_proc_to_mem, scm_debug_hang): Added prototypes
when GUILE_DEBUG is defined.
* dynwind.h (scm_wind_chain): Same.
* ports.h (scm_pt_size, scm_pt_member): Same.
* print.h (scm_current_pstate): Same.
* procs.h (scm_make_cclo): Same.
This commit is contained in:
Jim Blandy 1998-10-15 14:35:35 +00:00
parent a437d8a2a8
commit f3667f526d
8 changed files with 34 additions and 7 deletions

View file

@ -195,4 +195,15 @@ extern SCM scm_unmemoize SCM_P ((SCM memoized));
extern SCM scm_make_debugobj SCM_P ((scm_debug_frame* debug));
extern void scm_init_debug SCM_P ((void));
#ifdef GUILE_DEBUG
extern SCM scm_make_gloc SCM_P ((SCM var, SCM env));
extern SCM scm_gloc_p SCM_P ((SCM obj));
extern SCM scm_make_iloc SCM_P ((SCM frame, SCM binding, SCM cdrp));
extern SCM scm_iloc_p SCM_P ((SCM obj));
extern SCM scm_memcons SCM_P ((SCM car, SCM cdr, SCM env));
extern SCM scm_mem_to_proc SCM_P ((SCM obj));
extern SCM scm_proc_to_mem SCM_P ((SCM obj));
extern SCM scm_debug_hang SCM_P ((SCM obj));
#endif /*GUILE_DEBUG*/
#endif /* DEBUGH */