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

Convert regexps to use statically-allocated tc16

Browse source 
* libguile/scm.h: Allocate tc16.
* libguile/regex-posix.h:
* libguile/regex-posix.c:
* libguile/finalizers.h:
* libguile/finalizers.c: Adapt.
This commit is contained in:
Andy Wingo 2025-06-17 14:35:51 +02:00
parent 197345fa02
commit ace42e191e
5 changed files with 68 additions and 38 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/scm.h
View file

@ -515,9 +515,8 @@ typedef uintptr_t scm_t_bits;
#define scm_tc16_directory 0x047f
#define scm_tc16_syntax_transformer 0x057f
#define scm_tc16_random_state 0x067f
/*
#define scm_tc16_regexp 0x107f
*/
#define scm_tc16_regexp 0x077f
/* Definitions for tc16: */
#define SCM_TYP16(x) (0xffff & SCM_CELL_TYPE (x))