rm specpdl check in bytecode interpreter
authorRobin Templeton <robin@terpri.org>
Wed, 9 Jul 2014 09:45:58 +0000 (05:45 -0400)
committerRobin Templeton <robin@terpri.org>
Sat, 18 Apr 2015 22:49:12 +0000 (18:49 -0400)
src/bytecode.c

index 01fa1ba..6e91da1 100644 (file)
@@ -1909,15 +1909,6 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
     }
 
  exit:
-
-  /* Binds and unbinds are supposed to be compiled balanced.  */
-  if (SPECPDL_INDEX () != count)
-    {
-      if (SPECPDL_INDEX () > count)
-       unbind_to (count, Qnil);
-      error ("binding stack not balanced (serious byte compiler bug)");
-    }
-
   return result;
 }
 /* {{coccinelle:skip_end}} */