1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 12:20:20 +02:00

* regex-posix.c (scm_free_regex_t): Return size of regex_t instead

of 0; size_t --> scm_size_t.  Thanks to Bernard Urban.
This commit is contained in:
Mikael Djurfeldt 1997-11-06 15:09:30 +00:00
parent 0d5d71838d
commit 80b991c346
2 changed files with 7 additions and 2 deletions

View file

@ -87,13 +87,13 @@
long scm_tc16_regex_t;
static size_t
static scm_size_t
scm_free_regex_t (obj)
SCM obj;
{
regfree (SCM_RGX (obj));
free (SCM_RGX (obj));
return 0;
return sizeof(regex_t);
}
static int