diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-11-06 15:09:30 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-11-06 15:09:30 +0000 |
commit | 80b991c3462ab09d6170aa2a1d35eec7333db9e2 (patch) | |
tree | afd8cb2194e012e3f18100ececd585cacfb526c8 /libguile/regex-posix.c | |
parent | 0d5d71838d8bff8905f70ced003dc8f9c3c529b7 (diff) | |
download | guile-80b991c3462ab09d6170aa2a1d35eec7333db9e2.tar.gz |
* regex-posix.c (scm_free_regex_t): Return size of regex_t instead
of 0; size_t --> scm_size_t. Thanks to Bernard Urban.
Diffstat (limited to 'libguile/regex-posix.c')
-rw-r--r-- | libguile/regex-posix.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/regex-posix.c b/libguile/regex-posix.c index c6ffd3862..10117b816 100644 --- a/libguile/regex-posix.c +++ b/libguile/regex-posix.c @@ -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 |