Procedure TerminerAnalyse();
La séquence d'usage des méthodes est la suivante :
Si cette séquence n'est pas respectée, alors l'exception est ActionLexicaleImpossible est envoyée.
/****************************************************************/
Procedure EnvoyerErreur(MessageErreur : Caractere, NomFichierSource : Caractere, NumeroLigne : Entier, NumeroColonne : Entier)
/* Objet : Envoie une erreur. */
/****************************************************************/
Debut
...
Fin Procedure
Principal
/*******/
Variable
/******/
MonAnalyseurLexical : Nul Ou AnalyseurLexical;
F : Nul Ou Fichier;
PasFini : Booleen;
ElementLexical : Entier;
Debut
...
MonAnalyseurLexical.DebuterAnalyse(IFlux(F), F.NomFlux, PositionLibre, EnvoyerErreur);
...
PasFini=Vrai;
Tant PasFini Faire
ElementLexical=MonAnalyseurLexical.LireElementLexicalSuivant();
Selon ElementLexical Faire
Cas Pour ElementChaineApostrophes Faire
...
Fin Cas
Cas Pour ElementChaineChevrons Faire
...
Fin Cas
Cas Pour ElementChaineGuillemets Faire
...
Fin Cas
Cas Pour ElementCommentaireBloc Faire
...
Fin Cas
Cas Pour ElementCommentaireLigne Faire
...
Fin Cas
Cas Pour ElementEntier Faire
...
Fin Cas
Cas Pour ElementReel Faire
...
Fin Cas
Cas Pour ElementIdentifiant Faire
...
Fin Cas
Fin Selon
Fin TantQue
...
MonAnalyseurLexical.TerminerAnalyse();
...
Fin Principal
| - | - | - | - | - | - | - | - | - |