summaryrefslogtreecommitdiff
path: root/libguile/regex-posix.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@red-bean.com>1997-06-24 05:33:59 +0000
committerJim Blandy <jimb@red-bean.com>1997-06-24 05:33:59 +0000
commitfcfb248d0c06c530aa0c36f978b718eef17d1c81 (patch)
treed74673bbbd3136386b935be8a9b908227e74698b /libguile/regex-posix.c
parent6ac3c2922712d636aab69fca26dfa532fa997b58 (diff)
downloadguile-fcfb248d0c06c530aa0c36f978b718eef17d1c81.tar.gz
* regex-posix.c (scm_make_regexp, scm_regexp_exec): Add optional
FLAGS arguments. (scm_init_regex_posix): Define constants for the REG_mumble flags; name them according to the SCSH convention: regexp/mumble.
Diffstat (limited to 'libguile/regex-posix.c')
-rw-r--r--libguile/regex-posix.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/libguile/regex-posix.c b/libguile/regex-posix.c
index cd331a527..920697584 100644
--- a/libguile/regex-posix.c
+++ b/libguile/regex-posix.c
@@ -245,14 +245,14 @@ scm_init_regex_posix ()
scm_tc16_regex_t = scm_newsmob (&regex_t_smob);
/* Compilation flags. */
- scm_sysintern ("REG_EXTENDED", scm_long2num (REG_EXTENDED));
- scm_sysintern ("REG_ICASE", scm_long2num (REG_ICASE));
- scm_sysintern ("REG_NOSUB", scm_long2num (REG_NOSUB));
- scm_sysintern ("REG_NEWLINE", scm_long2num (REG_NEWLINE));
+ scm_sysintern ("regexp/extended", scm_long2num (REG_EXTENDED));
+ scm_sysintern ("regexp/icase", scm_long2num (REG_ICASE));
+ scm_sysintern ("regexp/nosub", scm_long2num (REG_NOSUB));
+ scm_sysintern ("regexp/newline", scm_long2num (REG_NEWLINE));
/* Execution flags. */
- scm_sysintern ("REG_NOTBOL", scm_long2num (REG_NOTBOL));
- scm_sysintern ("REG_NOTEOL", scm_long2num (REG_NOTEOL));
+ scm_sysintern ("regexp/notbol", scm_long2num (REG_NOTBOL));
+ scm_sysintern ("regexp/noteol", scm_long2num (REG_NOTEOL));
#include "regex-posix.x"