Реализовать операцию извлечения всех элементов с четными числами из списка

#include <iostream>
 
struct node {
    node* next;
    int   val;
    node(int v):next(NULL), val(v){}
};
 
node* slist_evens(node*& lst);
node* slist_make(int first, int last);
void  slist_clear(node* lst);
 
int main(void){
    node* l1 = slist_make(10, 25);
    if(l1 == NULL)
        return 1;
 
    //получить чётные элементы
    node* l2 = slist_evens(l1);
    for(const node* j = l2; j != NULL; j = j->next)
        std::cout << j->val << ' ';
    std::cout << std::endl; 
 
    //вывести оставшиеся
    for(const node* i = l1; i != NULL; i = i->next)
        std::cout << i->val << ' ';
    std::cout << std::endl;
 
    slist_clear(l1);
    slist_clear(l2);
    std::cin.get();
    return 0;
}
 
//извлечение всех элементов с чётными числами из списка
node* slist_evens(node*& lst){
    node*  h = NULL, *t = NULL;
    node* p1 = lst, *p2 = lst, *q;
 
    while(p2 != NULL){
        if((p2->val % 2) == 0){
            if(p2 == lst)
                q = lst = lst->next;
            else
                q = p1->next = p2->next;
 
            if(h == NULL)
                h = t = p2;
            else
                t = t->next = p2;
            p2 = q;
            continue;
        }
        p1 = p2;
        p2 = p2->next;
    }
 
    if(t != NULL)
        t->next = NULL;
    return h;
}
 
//создание списка
node* slist_make(int first, int last){
    node* p, *h = NULL, *t = NULL;
    for(int i = first; i <= last; ++i){
        p = new node(i);
        if(h == NULL)
            h = t = p;
        else
            t = t->next = p;
    }
    return h;
}
 
//удаление всего
void slist_clear(node* lst){
    node* t;
    while(lst != NULL){
        t   = lst;
        lst = lst->next;
        delete t;
    }
}