mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 05:50:26 +02:00
Code Activity

Code layout fix

Browse source
This commit is contained in:
Mikael Djurfeldt 2000-06-13 11:14:35 +00:00
parent e36a087045
commit 6c56304f22
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/regex-posix.c
View file

@ -201,7 +201,7 @@ SCM_DEFINE (scm_make_regexp, "make-regexp", 1, 0, 1,
flag = SCM_CDR (flag); flag = SCM_CDR (flag);
} }
rx = SCM_MUST_MALLOC_TYPE(regex_t); rx = SCM_MUST_MALLOC_TYPE (regex_t);
status = regcomp (rx, SCM_ROCHARS (pat), status = regcomp (rx, SCM_ROCHARS (pat),
/* Make sure they're not passing REG_NOSUB; /* Make sure they're not passing REG_NOSUB;
regexp-exec assumes we're getting match data. */ regexp-exec assumes we're getting match data. */