On aurait pu le faire en fortran!
Subroutine ListeLs(nb_element,elementId,element)
do i=1,nb_element
if(elementId(i).eq.idLine) then
call LineLs(element(i))
else if(elementId(i).eq.idArc) then
call ArcLs(element(i))
else if(elementId(i).eq.idLatex) then
call LatexLs(element(i))
endif
enddo
return
end
Cela devient vite compliqué si on veut ajouter d’autres objets, alors que TList::ls() est écrite une fois pour toutes!