Ordina lista crescente di interi

function sort_list(l)
{
    var prev,cur,tmp;
    if(l==null){return;}
    for(prev=l.testa;prev!=null;prev=prev.succ)
    {
        for(cur=prev.succ;cur!=null;cur=cur.succ)
        {
            if(cur.x>prev.x)
            {
                tmp=prev.x;
                prev.x=cur.x;
                cur.x=tmp;
            }
        }
    }

}