From 7f2d92b126c0d92a2bff3dbefe94fd6d9f1f9d03 Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Tue, 17 Aug 1999 08:44:38 +0000 Subject: [PATCH] * backtrace.c, backtrace.h, debug.c, debug.h, eval.c, eval.h, gsubr.c, gsubr.h, read.c, read.h, srcprop.c, srcprop.h (scm_i_filename, scm_i_line, scm_i_column, scm_i_copy, scm_i_name, scm_i_lambda, scm_i_source, scm_i_more, scm_i_procname, scm_i_dot, scm_i_arrow, scm_i_else, scm_i_unquote, scm_i_uq_splicing, scm_i_apply, scm_i_enter_frame, scm_i_apply_frame, scm_i_exit_frame, scm_i_trace, scm_i_quote, scm_i_begin, scm_i_if, scm_i_and, scm_i_or, scm_i_case, scm_i_cond, scm_i_letstar, scm_i_do, scm_i_quasiquote, scm_i_define, scm_i_letrec, scm_i_let, scm_i_atapply, scm_i_atcall_cc, scm_i_breakpoint): Renamed: Consequently use scm_sym_ as prefix for symbols. --- libguile/backtrace.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/libguile/backtrace.c b/libguile/backtrace.c index 292bdf98b..7e07a1317 100644 --- a/libguile/backtrace.c +++ b/libguile/backtrace.c @@ -77,17 +77,17 @@ display_header (source, port) SCM port; { SCM fname = (SCM_NIMP (source) && SCM_MEMOIZEDP (source) - ? scm_source_property (source, scm_i_filename) + ? scm_source_property (source, scm_sym_filename) : SCM_BOOL_F); if (SCM_NIMP (fname) && SCM_STRINGP (fname)) { scm_prin1 (fname, port, 0); scm_putc (':', port); - scm_intprint (SCM_INUM (scm_source_property (source, scm_i_line)) + 1, + scm_intprint (SCM_INUM (scm_source_property (source, scm_sym_line)) + 1, 10, port); scm_putc (':', port); - scm_intprint (SCM_INUM (scm_source_property (source, scm_i_column)) + 1, + scm_intprint (SCM_INUM (scm_source_property (source, scm_sym_column)) + 1, 10, port); } @@ -400,7 +400,7 @@ display_frame (frame, nfield, indentation, sport, port, pstate) { SCM source = SCM_FRAME_SOURCE (frame); SCM copy = (SCM_NIMP (source) && SCM_CONSP (source) - ? scm_source_property (source, scm_i_copy) + ? scm_source_property (source, scm_sym_copy) : SCM_BOOL_F); SCM umcopy = (SCM_NIMP (source) && SCM_MEMOIZEDP (source) ? scm_unmemoize (source)