/*-------------------------------------------------------------------------*/ void affiche_lireExp(n_exp *n) { char *fct = "lireExp"; affiche_balise_ouvrante(fct, trace_abs); affiche_balise_fermante(fct, trace_abs); }
void affiche_appelExp(n_exp *n) { char *fct = "appelExp"; affiche_balise_ouvrante(fct, trace_abs); affiche_appel(n->u.appel); affiche_balise_fermante(fct, trace_abs); }
void affiche_instr_ecrire(n_instr *n) { char *fct = "instr_ecrire"; affiche_balise_ouvrante(fct, trace_abs); affiche_exp(n->u.ecrire_.expression); affiche_balise_fermante(fct, trace_abs); }
void affiche_varExp(n_exp *n) { char *fct = "varExp"; affiche_balise_ouvrante(fct, trace_abs); affiche_var(n->u.var); affiche_balise_fermante(fct, trace_abs); }
void affiche_instr_retour(n_instr *n) { char *fct = "instr_retour"; affiche_balise_ouvrante(fct, trace_abs); affiche_exp(n->u.retour_.expression); affiche_balise_fermante(fct, trace_abs); }
void affiche_appel(n_appel *n) { char *fct = "appel"; affiche_balise_ouvrante(fct, trace_abs); affiche_texte( n->fonction, trace_abs); affiche_l_exp(n->args); affiche_balise_fermante(fct, trace_abs); }
void affiche_instr_faire(n_instr *n) /* MODIFIE POUR EVAL */ { /* MODIFIE POUR EVAL */ char *fct = "instr_faire"; /* MODIFIE POUR EVAL */ affiche_balise_ouvrante(fct, trace_abs); /* MODIFIE POUR EVAL */ affiche_instr(n->u.faire_.faire); /* MODIFIE POUR EVAL */ affiche_exp(n->u.faire_.test); /* MODIFIE POUR EVAL */ affiche_balise_fermante(fct, trace_abs); /* MODIFIE POUR EVAL */ } /* MODIFIE POUR EVAL */
/*-------------------------------------------------------------------------*/ void affiche_var_indicee(n_var *n) { char *fct = "var_indicee"; affiche_balise_ouvrante(fct, trace_abs); affiche_element("var_base_tableau", n->nom, trace_abs); affiche_exp( n->u.indicee_.indice ); affiche_balise_fermante(fct, trace_abs); }
void Tprime(void) { affiche_balise_ouvrante(__func__, TRACE_XML); if (uniteCourante == FOIS) { uniteCourante = yylex(); T(); } affiche_balise_fermante(__func__, TRACE_XML); }
void affiche_instr_appel(n_instr *n) { char *fct = "instr_appel"; affiche_balise_ouvrante(fct, trace_abs); affiche_appel(n->u.appel); affiche_balise_fermante(fct, trace_abs); }
void affiche_instr_tantque(n_instr *n) { char *fct = "instr_tantque"; affiche_balise_ouvrante(fct, trace_abs); affiche_exp(n->u.tantque_.test); affiche_instr(n->u.tantque_.faire); affiche_balise_fermante(fct, trace_abs); }
void affiche_n_prog(n_prog *n) { char *fct = "prog"; affiche_balise_ouvrante(fct, trace_abs); affiche_l_dec(n->variables); affiche_l_dec(n->fonctions); affiche_balise_fermante(fct, trace_abs); }
void affiche_l_instr(n_l_instr *n) { char *fct = "l_instr"; if(n){ affiche_balise_ouvrante(fct, trace_abs); affiche_instr(n->tete); affiche_l_instr(n->queue); affiche_balise_fermante(fct, trace_abs); } }
void affiche_foncDec(n_dec *n) { char *fct = "foncDec"; affiche_balise_ouvrante(fct, trace_abs); affiche_texte( n->nom, trace_abs ); affiche_l_dec(n->u.foncDec_.param); affiche_l_dec(n->u.foncDec_.variables); affiche_instr(n->u.foncDec_.corps); affiche_balise_fermante(fct, trace_abs); }
void affiche_instr_affect(n_instr *n) { char *fct = "instr_affect"; affiche_balise_ouvrante(fct, trace_abs); affiche_var(n->u.affecte_.var); affiche_exp(n->u.affecte_.exp); affiche_balise_fermante(fct, trace_abs); }
void affiche_l_exp(n_l_exp *n) { char *fct = "l_exp"; affiche_balise_ouvrante(fct, trace_abs); if(n){ affiche_exp(n->tete); affiche_l_exp(n->queue); } affiche_balise_fermante(fct, trace_abs); }
void affiche_instr_si(n_instr *n) { char *fct = "instr_si"; affiche_balise_ouvrante(fct, trace_abs); affiche_exp(n->u.si_.test); affiche_instr(n->u.si_.alors); if(n->u.si_.sinon){ affiche_instr(n->u.si_.sinon); } affiche_balise_fermante(fct, trace_abs); }
void F(void) { affiche_balise_ouvrante(__func__, TRACE_XML); if (uniteCourante == PARENTHESE_OUVRANTE) { uniteCourante = yylex(); E(); if (uniteCourante == PARENTHESE_FERMANTE) { uniteCourante = yylex(); goto end; } else szntqx8error(); } else if (uniteCourante == NOMBRE) { uniteCourante = yylex(); goto end; } else szntqx8error(); end: affiche_balise_fermante(__func__, TRACE_XML); }
/*-------------------------------------------------------------------------*/ void affiche_opExp(n_exp *n) { char *fct = "opExp"; affiche_balise_ouvrante(fct, trace_abs); if(n->u.opExp_.op == plus) affiche_texte("plus", trace_abs); else if(n->u.opExp_.op == moins) affiche_texte("moins", trace_abs); else if(n->u.opExp_.op == fois) affiche_texte("fois", trace_abs); else if(n->u.opExp_.op == divise) affiche_texte("divise", trace_abs); else if(n->u.opExp_.op == egal) affiche_texte("egal", trace_abs); else if(n->u.opExp_.op == diff) affiche_texte("diff", trace_abs); else if(n->u.opExp_.op == inf) affiche_texte("inf", trace_abs); else if(n->u.opExp_.op == infeg) affiche_texte("infeg", trace_abs); else if(n->u.opExp_.op == ou) affiche_texte("ou", trace_abs); else if(n->u.opExp_.op == et) affiche_texte("et", trace_abs); else if(n->u.opExp_.op == non) affiche_texte("non", trace_abs); if( n->u.opExp_.op1 != NULL ) { affiche_exp(n->u.opExp_.op1); } if( n->u.opExp_.op2 != NULL ) { affiche_exp(n->u.opExp_.op2); } affiche_balise_fermante(fct, trace_abs); }
void T(void) { affiche_balise_ouvrante(__func__, TRACE_XML); F(); Tprime(); affiche_balise_fermante(__func__, TRACE_XML); }