changeset 24119:aceb3b94328d

(re_match_2_internal) [WINDOWSNT & emacs]: Insert QUIT at various places.
author Richard M. Stallman <rms@gnu.org>
date Tue, 19 Jan 1999 03:24:03 +0000
parents e9cc3f97cdc3
children 372fcaa211c4
files src/regex.c
diffstat 1 files changed, 13 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/regex.c	Tue Jan 19 03:23:10 1999 +0000
+++ b/src/regex.c	Tue Jan 19 03:24:03 1999 +0000
@@ -5007,6 +5007,10 @@
 	on_failure:
 	  DEBUG_PRINT1 ("EXECUTING on_failure_jump");
 
+#if defined (WINDOWSNT) && defined (emacs)
+	  QUIT;
+#endif
+
 	  EXTRACT_NUMBER_AND_INCR (mcnt, p);
 	  DEBUG_PRINT3 (" %d (to 0x%x)", mcnt, p + mcnt);
 
@@ -5047,6 +5051,9 @@
 	/* A smart repeat ends with `maybe_pop_jump'.
 	   We change it to either `pop_failure_jump' or `jump'.	 */
 	case maybe_pop_jump:
+#if defined (WINDOWSNT) && defined (emacs)
+	  QUIT;
+#endif
 	  EXTRACT_NUMBER_AND_INCR (mcnt, p);
 	  DEBUG_PRINT2 ("EXECUTING maybe_pop_jump %d.\n", mcnt);
 	  {
@@ -5267,6 +5274,9 @@
 	/* Unconditionally jump (without popping any failure points).  */
 	case jump:
 	unconditional_jump:
+#if defined (WINDOWSNT) && defined (emacs)
+	  QUIT;
+#endif
 	  EXTRACT_NUMBER_AND_INCR (mcnt, p);	/* Get the amount to jump.  */
 	  DEBUG_PRINT2 ("EXECUTING jump %d ", mcnt);
 	  p += mcnt;				/* Do the jump.	 */
@@ -5670,6 +5680,9 @@
 
     /* We goto here if a matching operation fails. */
     fail:
+#if defined (WINDOWSNT) && defined (emacs)
+      QUIT;
+#endif
       if (!FAIL_STACK_EMPTY ())
 	{ /* A restart point is known.  Restore to that state.  */
           DEBUG_PRINT1 ("\nFAIL:\n");