Mercurial > emacs
changeset 2453:944c0ecde8b1
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Fri, 02 Apr 1993 22:53:56 +0000 |
parents | 5c9d9b33f249 |
children | d77bb274b15c |
files | src/regex.c |
diffstat | 1 files changed, 16 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/regex.c Fri Apr 02 16:41:54 1993 +0000 +++ b/src/regex.c Fri Apr 02 22:53:56 1993 +0000 @@ -1302,6 +1302,7 @@ the `*'. Do we have to do something analogous here for null bytes, because of RE_DOT_NOT_NULL? */ if (TRANSLATE (*(p - 2)) == TRANSLATE ('.') + && zero_times_ok && p < pend && TRANSLATE (*p) == TRANSLATE ('\n') && !(syntax & RE_DOT_NEWLINE)) { /* We have .*\n. */ @@ -1612,6 +1613,10 @@ fixup_alt_jump = 0; laststart = 0; begalt = b; + /* If we've reached MAX_REGNUM groups, then this open + won't actually generate any code, so we'll have to + clear pending_exact explicitly. */ + pending_exact = 0; break; @@ -1661,6 +1666,10 @@ : 0; laststart = bufp->buffer + COMPILE_STACK_TOP.laststart_offset; this_group_regnum = COMPILE_STACK_TOP.regnum; + /* If we've reached MAX_REGNUM groups, then this open + won't actually generate any code, so we'll have to + clear pending_exact explicitly. */ + pending_exact = 0; /* We're at the end of the group, so now we know how many groups were inside this one. */ @@ -4881,6 +4890,13 @@ Dump core so we can fix it. */ abort (); + msg = re_error_msg[errcode]; + + /* POSIX doesn't require that we do anything in this case, but why + not be nice. */ + if (! msg) + msg = "Success"; + msg_size = strlen (msg) + 1; /* Includes the null. */ if (errbuf_size != 0)