Small fix in satoko.

src/sat/satoko/solver.c

@@ -521,7 +521,6 @@ void solver_cancel_until(solver_t *s, unsigned level)
     for (i = vec_uint_size(s->trail); i --> vec_uint_at(s->trail_lim, level);) {
         unsigned var = lit2var(vec_uint_at(s->trail, i));
 
-        vec_char_assign(s->polarity, var, vec_char_at(s->assigns, var));
         vec_char_assign(s->assigns, var, SATOKO_VAR_UNASSING);
         vec_uint_assign(s->reasons, var, UNDEF);
         if (!heap_in_heap(s->var_order, var))

src/sat/satoko/solver.h

@@ -209,8 +209,7 @@ static inline int solver_enqueue(solver_t *s, unsigned lit, unsigned reason)
     unsigned var = lit2var(lit);
 
     vec_char_assign(s->assigns, var, lit_polarity(lit));
-    if ( solver_dlevel(s) == 0 )
-        vec_char_assign(s->polarity, var, lit_polarity(lit));
+    vec_char_assign(s->polarity, var, lit_polarity(lit));
     vec_uint_assign(s->levels, var, solver_dlevel(s));
     vec_uint_assign(s->reasons, var, reason);
     vec_uint_push_back(s->trail, lit);