Re: Crash, boucle infinie, ou programme vide ?

Retourner au contenu associé (journal : Chantonnons en récursion)

[^] # Re: Crash, boucle infinie, ou programme vide ?

Posté par Blackknight (site web personnel, Mastodon) le 23 novembre 2012 à 09:10. En réponse au journal Chantonnons en récursion. Évalué à 1.

 function Yusuf return Natural is
 procedure Blood;
 procedure Head;
 procedure Love is
 begin
 Blood;
 end Love;
 procedure Blood is
 begin
 Head;
 end Blood;
 procedure Head is
 begin
 Love;
 end Head;
 begin
 Love;
 return 0;
 end Yusuf;

Même comportement en Ada au bémol du $? qui retourne toujours 1.