/* Check whether 'status' signals a syntax error and the error message at the top of the stack ends with the above mark for incomplete statements.  */
static int incomplete(lua_State *L, int status)
/* Check whether 'status' signals a syntax error and the error message at the top of the stack ends with the above mark for incomplete statements.  */
static int incomplete(lua_State *L, int status)
{
    size_t lmsg;
    const char *msg = lua_tolstring(L, -1, &lmsg);
    if (lmsg >= marklen && strcmp(msg + lmsg - marklen, EOFMARK) == 0) {
      lua_pop(L, 1);
      return 1;
    }
  }
  return 0;
}