# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1034570602 0
# Node ID e5d59debb925a4df90194a8a6f0cc50d0dc91e52
# Parent  f0d9067a78fd97c389de008b219004978db61f9f
(scan_lists): Don't get fooled by a symbol ending with a backslash-quoted char.
(scan_lists, scan_sexps_forward): Pacify the compiler.

diff -r f0d9067a78fd -r e5d59debb925 src/syntax.c
--- a/src/syntax.c	Mon Oct 14 01:38:07 2002 +0000
+++ b/src/syntax.c	Mon Oct 14 04:43:22 2002 +0000
@@ -2164,6 +2164,9 @@
 	      INC_BOTH (from, from_byte);
 	      if (!depth && sexpflag) goto done;
 	      break;
+	    default:
+	      /* Ignore whitespace, punctuation, quote, endcomment.  */
+	      break;
 	    }
 	}
 
@@ -2211,7 +2214,10 @@
 	     into a word character.  Note that this cannot be true
 	     if we decremented FROM in the if-statement above.  */
 	  if (code != Sendcomment && char_quoted (from, from_byte))
-	    code = Sword;
+	    {
+	      DEC_BOTH (from, from_byte);
+	      code = Sword;
+	    }
 	  else if (SYNTAX_PREFIX (c))
 	    continue;
 
@@ -2332,6 +2338,9 @@
 	      DEC_BOTH (from, from_byte);
 	      if (!depth && sexpflag) goto done2;
 	      break;
+	    default:
+	      /* Ignore whitespace, punctuation, quote, endcomment.  */
+	      break;
 	    }
 	}
 
@@ -2675,6 +2684,7 @@
 	  curlevel->prev = curlevel->last;
 	  break;
 
+	case Scomment_fence: /* Can't happen because it's handled above.  */
 	case Scomment:
 	  if (commentstop || boundary_stop) goto done;
 	startincomment:
@@ -2770,6 +2780,10 @@
 	  break;
 
 	case Smath:
+	  /* FIXME: We should do something with it.  */
+	  break;
+	default:
+	  /* Ignore whitespace, punctuation, quote, endcomment.  */
 	  break;
 	}
     }