Создать однопоточный линейный список и сортировать методом пузырька

#include <stdio.h>
 
struct  lst {
     int  num;
     lst*  next;
     lst(void) : next(NULL) {}
     lst(lst* node, int data) {
        next = node;
        num = data;
     }
};
 
 
// функция по добавлению в список данных в хвост
lst*   add_back(lst*  p, int data) {
    if(! p) 
        p->next = p = new lst(NULL, data);
     else 
        p = p->next = new lst(p->next, data);
    return  p;
}
 
 
// функция возвращает размера списка
int  lsize(const lst* p)  {
    int size = 0;
    const lst*  next  = p->next;
    const lst*  end  = p->next;
    do {
        ++size;
        next = next->next;
    } while( next != end );
    return size;
}
 
 
// функция сортировки
lst*  lsort(lst* p) {
    int  size = lsize(p);
    while(1) {
        short test = 0;
        int sz = size - 1;
        for(lst* ps = p->next; sz--; ps = ps->next) {
            if( ps->num > ps->next->num ) {  
                int  tmp = ps->num;              
                ps->num = ps->next->num;      
                ps->next->num = tmp;   
                test = 1;
            }
        }
        if(! test)
             break;
    }
    return p;
}
 
 
 
// функция по удалению всего списка
void  lclear(lst* p) {
        int size = lsize(p);
        while(size--) {
             lst* tmp = p;
             p = p->next;
             delete tmp;
             tmp = NULL;
        }
}
 
 
// функция вывода
void  lprint(lst* l, const char* fmt) {
    const lst*  iter   = l->next;
    const lst*  end  = l->next;
    do {
        printf(fmt, iter->num );
        iter = iter->next;
    } while( iter != end );
}
 
 
void  main(void){
 
    lst*  l       =  NULL;
 
     // добавляем в список
    l = add_back(l,  4000);
    l = add_back(l,  2000);
    l = add_back(l,  1000);
    l = add_back(l,  -2005);
    l = add_back(l,  3000);
    l = add_back(l,  9000);
 
    // сортируем методом пузырка Кнута
    l = lsort(l);
 
    // выводим в консоль
    lprint(l, "%d, ");
 
    printf("\nsize = %d\n", lsize(l));
 
    lclear(l);
}