Description...
Exemple...
Traduction...
Fonction Optimiser(Invariant) EnumererTypes(Numero : Entier, Aide: Nul Ou Caractere Sortie) Retourner Nul Ou Type;
En sortie, la variable Aide recueille un libellé donnant la sémantique de l'entrepôt et le résultat est le type.
Type T1
/*****/
...
Fin Type
Type T2
/*****/
...
Fin Type
Type T3
/*****/
...
Fin Type
Variable
M : Nul Ou Module;
Numero : Entier;
T : Nul Ou Type;
Principal
M=Module("M1");
P=M.EnumererTypes(++Numero, ?);
/* Enumère les types de 'M1'. */
TantQue T!=Nul Faire
Ecran.Ecrire(T.NomType);
T=M.EnumererTypes(++Numero, ?);
Fin TantQue
Fin Principal
ArtenAufZahlen | EnumerateTypes | 列举型 | EnumerarTipos | - | - | - | - |