1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-07-02 15:40:38 +02:00

Move char-set-cursor implementation to Scheme

Also deprecate the C interface.

* libguile/deprecated.h:
* libguile/deprecated.c (scm_char_set_cursor):
(scm_char_set_ref):
(scm_char_set_cursor_next):
(scm_end_of_char_set_p): Deprecate.
* libguile/srfi-14.c (charset-mutable?, char-set-ranges)
(charset-set-ranges!): New accessors, exposed internally to srfi-14.scm.
* libguile/srfi-14.c (scm_boot_srfi_14): Remove scm_tc16_charset_cursor.
* module/srfi/srfi-14.scm (<char-set-cursor>): Implement as a record.
This commit is contained in:
Andy Wingo 2025-06-13 11:10:22 +02:00
parent 4516119dd1
commit 7a1406891f
5 changed files with 182 additions and 158 deletions

View file

@ -75,6 +75,11 @@ SCM_DEPRECATED SCM scm_array_slice_for_each_in_order (SCM frank, SCM op, SCM arg
SCM_DEPRECATED SCM scm_array_cell_ref (SCM array, SCM indices);
SCM_DEPRECATED SCM scm_array_cell_set_x (SCM array, SCM val, SCM indices);
SCM_DEPRECATED SCM scm_char_set_cursor (SCM cs);
SCM_DEPRECATED SCM scm_char_set_ref (SCM cs, SCM cursor);
SCM_DEPRECATED SCM scm_char_set_cursor_next (SCM cs, SCM cursor);
SCM_DEPRECATED SCM scm_end_of_char_set_p (SCM cursor);
/* Deprecated declarations go here. */
void scm_i_init_deprecated (void);