Удалить все элементы, совпадающие с последним элементом двусвязного списка

#include <iostream>
 
struct node {
    node* next;
    node* prev;
    int   val;
    node(int v):next(NULL), prev(NULL), val(v){}
};
 
typedef struct {
    node* head;
    node* tail;
} list_t;
 
void  list_init(list_t* lst){ lst->head = lst->tail = NULL; }
void  list_add_front(list_t* lst, int val);
void  list_add_back(list_t* lst, int val);
void  list_clear(list_t* lst);
node* list_erase(list_t* lst, node* p);
 
 
int main(void){
    int a[] = { 5, 2, 9, 1, 3, 7, 9, 2, 9 };
 
    list_t lst;
    list_init(&lst);
    for(unsigned i = 0; i < sizeof(a)/sizeof(a[0]); ++i)
        list_add_back(&lst, a[i]);
 
    //найти макс
    int _max = (lst.head != NULL) ? lst.head->val : 0;
    for(const node* p = lst.head; p != NULL; p = p->next){
        if(p->val > _max)
            _max = p->val;
    }
 
    //удалить макс
    node* it = lst.head; 
    while(it != NULL){
        if(it->val == _max)
            it = list_erase(&lst, it);
        else
            it = it->next;
    }
 
    //вывод вперёд
    for(const node* p1 = lst.head; p1 != NULL; p1 = p1->next)
        std::cout << p1->val << ' ';
    std::cout << std::endl;
 
    //вывод назад
    for(const node* p2 = lst.tail; p2 != NULL; p2 = p2->prev)
        std::cout << p2->val << ' ';
    std::cout << std::endl;
 
    list_clear(&lst);
    std::cin.get();
    return 0;
}
 
//вставка в начало
void list_add_front(list_t* lst, int val){
    node* p = new node(val);
    if(lst->head == NULL)
        lst->head = lst->tail = p;
    else {
        p->next = lst->head;
        lst->head->prev = p;
        lst->head = p;
    }
}
 
//вставка в конец
void list_add_back(list_t* lst, int val){
    node* p = new node(val);
    if(lst->head == NULL)
        lst->head = lst->tail = p;
    else {
        p->prev = lst->tail;
        lst->tail->next = p;
        lst->tail = p;
    }
}
 
//удалить всё
void list_clear(list_t* lst){
    node* tmp;
    while(lst->head != NULL){
        tmp = lst->head;
        lst->head = lst->head->next;
        delete tmp;
    }
    lst->tail = NULL;
}
 
//удаление
node* list_erase(list_t* lst, node* p){
    node* next = p->next;
    if(lst->head == p){
        lst->head = lst->head->next;
        if(lst->head != NULL)
            lst->head->prev = NULL;
        else
            lst->tail = NULL;
    } else if(lst->tail == p){
        lst->tail = lst->tail->prev;
        lst->tail->next = NULL;
    } else {
        p->prev->next = p->next;
        p->next->prev = p->prev;
    }
    delete p;
    return next;
}