let filter entry ts =
                  keep_prev_loc
                    (Token.Filter.filter (get_filter entry.egram) ts)