# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1084268845 0
# Node ID ada02c2b390c68fb15ce595e2c4bea441e36e073
# Parent  455a962a0dbaef2e773331fd0fd1dffc856e92a6
(mutually_exclusive_p): In 'case wordbeg', compare op2
against proper opcode.

diff -r 455a962a0dba -r ada02c2b390c src/regex.c
--- a/src/regex.c	Tue May 11 09:41:20 2004 +0000
+++ b/src/regex.c	Tue May 11 09:47:25 2004 +0000
@@ -4661,7 +4661,7 @@
     case wordbeg:
     case syntaxspec:
       return ((re_opcode_t) *p1 == notsyntaxspec
-	      && p1[1] == (op2 == wordend ? Sword : p2[1]));
+	      && p1[1] == (op2 == wordbeg ? Sword : p2[1]));
 
     case wordbound:
       return (((re_opcode_t) *p1 == notsyntaxspec