diff options
author | Andy Wingo <wingo@pobox.com> | 2020-09-03 22:55:08 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2020-09-03 22:55:08 +0200 |
commit | 6f6abb3bb57e54444fd68ebcd451032fb5ce19c0 (patch) | |
tree | 94121e8230b834e56912779e8156a8988bcee213 /libguile/deprecated.h | |
parent | 837580587ba8dfab22ad74e3b4c062df00ca7422 (diff) | |
download | guile-6f6abb3bb57e54444fd68ebcd451032fb5ce19c0.tar.gz |
Clean up srcprops implementation
* libguile/deprecated.c (scm_sym_copy, scm_make_srcprops): Deprecate.
* libguile/deprecated.h (scm_tc16_srcprops)
(SCM_SOURCE_PROPERTY_FLAG_BREAK): Deprecate.
* libguile/private-options.h (SCM_COPY_SOURCE_P): Remove.
* libguile/read.c (struct t_read_opts, scm_read_options): Remove useless
copy read option.
(maybe_annotate_source): Change line and column to be tagged, and
subtract off lookahead here. Change all callers.
(READ_OPTION_COPY_SOURCE_P): Remove, renumbering other options.
(init_read_options): Remove copy option.
* libguile/srcprop.c: Change to put filename inline in source
properties. Update private implementation.
* libguile/srcprop.h (SCM_PROCTRACEP): Remove. Unusable given that
scm_sym_trace was undefined.
Diffstat (limited to 'libguile/deprecated.h')
-rw-r--r-- | libguile/deprecated.h | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/libguile/deprecated.h b/libguile/deprecated.h index 81ec7b073..c78e2b1a4 100644 --- a/libguile/deprecated.h +++ b/libguile/deprecated.h @@ -131,6 +131,13 @@ SCM_DEPRECATED SCM scm_bit_position (SCM item, SCM v, SCM k); SCM_DEPRECATED SCM scm_bit_set_star_x (SCM v, SCM kv, SCM obj); SCM_DEPRECATED SCM scm_istr2bve (SCM str); +#define SCM_SOURCE_PROPERTY_FLAG_BREAK 1 + +SCM_DEPRECATED scm_t_bits scm_tc16_srcprops; +SCM_DEPRECATED SCM scm_sym_copy; +SCM_DEPRECATED SCM scm_make_srcprops (long line, int col, SCM filename, + SCM copy, SCM alist); + void scm_i_init_deprecated (void); #endif |