elimina duplicato da lista unidirezionale

function del_dup(l)
{
    var prev,R,cur;
    if(l==null){return;}
    else
    { for(prev=l.testa;prev!=null;prev=prev.succ)
     {
        for(r=l.testa,cur=l.testa.succ;cur!=null;cur=cur.succ)
        {
            if(cur.x==prev.x){R.succ=cur.succ;}
            R=cur;
        }
     }
    } return l;
}