# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 808851634 0
# Node ID b2a75405de3ccbf6336c3581b82d1e247456f91b
# Parent  3ae9326907aaa0b885e75c8268a20b396a2728aa
(scan_sexps_forward): Fix previous change.

diff -r 3ae9326907aa -r b2a75405de3c src/syntax.c
--- a/src/syntax.c	Sat Aug 19 16:59:43 1995 +0000
+++ b/src/syntax.c	Sat Aug 19 17:00:34 1995 +0000
@@ -1534,7 +1534,7 @@
 	    error ("Nesting too deep for parser");
 	  curlevel->prev = -1;
 	  curlevel->last = -1;
-	  if (targetdepth != depth) goto done;
+	  if (targetdepth == depth) goto done;
 	  break;
 
 	case Sclose:
@@ -1544,7 +1544,7 @@
 	  if (curlevel != levelstart)
 	    curlevel--;
 	  curlevel->prev = curlevel->last;
-	  if (targetdepth != depth) goto done;
+	  if (targetdepth == depth) goto done;
 	  break;
 
 	case Sstring: