let clear () = Stmt.Hashtbl.clear states