Fonction Optimiser(Invariant) EnumererExceptions(Numero : Entier, Aide : Nul Ou Caractere=? Sortie) Retourner Nul Ou Exception;
En sortie, la variable Aide recueille un libellé donnant la sémantique de l'exception et le résultat est l'exception.
Exception
/*******/
	E1("E1", 1);
	E2("E2", 2);
	E3("E3", 3);
Variable
/******/
	M : Nul Ou Module;
	Numero : Entier;
	E : Nul Ou Exception;
Principal
/*******/
M=Module("M1");
E=M.EnumererExceptions(++Numero, ?);
/* Enumère les exceptions de 'M1'. */
TantQue E!=Nul Faire
	Ecran.Ecrire(E.NomException);
	E=M.EnumererExceptions(++Numero, ?);
Fin TantQue
Fin Principal
| - | - | - | - | - | - | - | - | - |