]> git.eshelyaron.com Git - emacs.git/commitdiff
(scan_sexps_forward): Set up the syntax table scanning
authorRichard M. Stallman <rms@gnu.org>
Mon, 10 Aug 1998 21:19:03 +0000 (21:19 +0000)
committerRichard M. Stallman <rms@gnu.org>
Mon, 10 Aug 1998 21:19:03 +0000 (21:19 +0000)
stuff before jumping into the loop.

src/syntax.c

index b17a8d4d0bcd1e9f5aa74efec8ae27d75c44b5fb..4edac655b7fbf48a32a4dfec5231d9251bfd249f 100644 (file)
@@ -2383,17 +2383,23 @@ do { prev_from = from;                          \
   curlevel->prev = -1;
   curlevel->last = -1;
 
+  SETUP_SYNTAX_TABLE (prev_from, 1);
+  prev_from_syntax = SYNTAX_WITH_FLAGS (FETCH_CHAR (prev_from_byte));
+  UPDATE_SYNTAX_TABLE_FORWARD (from);
+
   /* Enter the loop at a place appropriate for initial state.  */
 
-  if (state.incomment) goto startincomment;
+  if (state.incomment)
+    goto startincomment;
   if (state.instring >= 0)
     {
       nofence = state.instring != ST_STRING_STYLE;
-      if (start_quoted) goto startquotedinstring;
+      if (start_quoted)
+       goto startquotedinstring;
       goto startinstring;
     }
-  if (start_quoted) goto startquoted;
-
+  else if (start_quoted)
+    goto startquoted;
 
   SETUP_SYNTAX_TABLE (prev_from, 1);
   prev_from_syntax = SYNTAX_WITH_FLAGS (FETCH_CHAR (prev_from_byte));