mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-23 20:05:32 +02:00
Code Activity

* eval.c, debug.h (SCM_WARN_DEPRECATED): New debug option.

Browse source 
* deprecation.c (scm_issue_deprecation_warning,
scm_c_issue_deprecation_warning_fmt): Use it.
(mode): Removed.
(print_summary): New.
(scm_init_deprecation): Initialize SCM_WARN_DEPRECATED instead of
mode.
This commit is contained in:
Marius Vollmer 2005-01-11 17:43:37 +00:00
parent d6dc83a9bc
commit 65bc1f7a0b
3 changed files with 13 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/debug.h
View file

@ -58,7 +58,8 @@ SCM_API scm_t_option scm_debug_opts[];
#define SCM_DEVAL_P scm_debug_opts[11].val
#define SCM_STACK_LIMIT scm_debug_opts[12].val
#define SCM_SHOW_FILE_NAME scm_debug_opts[13].val
#define SCM_N_DEBUG_OPTIONS 14
#define SCM_WARN_DEPRECATED scm_debug_opts[14].val
#define SCM_N_DEBUG_OPTIONS 15
SCM_API int scm_debug_mode_p;
SCM_API int scm_check_entry_p;