* backtrace.c (scm_display_error_message): Introduced fancy
authorMikael Djurfeldt <djurfeldt@nada.kth.se>
Mon, 12 May 2003 20:46:52 +0000 (20:46 +0000)
committerMikael Djurfeldt <djurfeldt@nada.kth.se>
Mon, 12 May 2003 20:46:52 +0000 (20:46 +0000)
commitdfd03fb91b66599064c51c2924ead945b00852c5
treef62ff3e0e588f50477cd44d38f800a523f848c94
parent7aaf8dc9f768bce59b295fc09df50ed5cd7efdf1
* backtrace.c (scm_display_error_message): Introduced fancy
printing with max level 7 and length 10.  (Purpose: avoid printing
gigantic objects in error messages.)

* print.c, print.h (scm_i_port_with_print_state): New function.

* print.c (scm_iprin1, scm_printer_apply,
scm_port_with_print_state): Use scm_i_port_with_print_state.
(scm_simple_format): Modified not to destroy print states.
(print_state_mutex): New mutex.
(scm_make_print_state, scm_free_print_state, scm_prin1):
Lock/unlock print_state_mutex.
libguile/ChangeLog
libguile/backtrace.c
libguile/print.c
libguile/print.h