[BACK]Return to instructions_p4.c CVS log [TXT] [DIR] Up to [local] / rpl / src

Diff for /rpl/src/instructions_p4.c between versions 1.46 and 1.47

version 1.46, 2013/03/16 11:31:41 version 1.47, 2013/03/20 22:24:36
Line 470  instruction_prvar(struct_processus *s_et Line 470  instruction_prvar(struct_processus *s_et
 void  void
 instruction_prusr(struct_processus *s_etat_processus)  instruction_prusr(struct_processus *s_etat_processus)
 {  {
     int                         i;      integer8                    i;
     int                         nb_variables;      integer8                    nb_variables;
   
     struct_objet                s_objet;      struct_objet                s_objet;
   
Line 512  instruction_prusr(struct_processus *s_et Line 512  instruction_prusr(struct_processus *s_et
   
     nb_variables = nombre_variables(s_etat_processus);      nb_variables = nombre_variables(s_etat_processus);
   
     if ((tableau = malloc(nb_variables * sizeof(struct_tableau_variables)))      if ((tableau = malloc(((size_t) nb_variables) *
             == NULL)              sizeof(struct_tableau_variables))) == NULL)
     {      {
         liberation_mutexes_arbre_variables_partagees(s_etat_processus,          liberation_mutexes_arbre_variables_partagees(s_etat_processus,
                 (*(*s_etat_processus).s_arbre_variables_partagees));                  (*(*s_etat_processus).s_arbre_variables_partagees));
Line 536  instruction_prusr(struct_processus *s_et Line 536  instruction_prusr(struct_processus *s_et
             return;              return;
         }          }
   
         sprintf((unsigned char *) s_objet.objet, "\\\\noindent %s [%lu]\n",          sprintf((unsigned char *) s_objet.objet, "\\\\noindent %s [%lld]\n",
                 tableau[i].nom, tableau[i].niveau);                  tableau[i].nom, tableau[i].niveau);
   
         formateur_tex(s_etat_processus, &s_objet, 'N');          formateur_tex(s_etat_processus, &s_objet, 'N');
Line 563  instruction_prusr(struct_processus *s_et Line 563  instruction_prusr(struct_processus *s_et
 void  void
 instruction_prmd(struct_processus *s_etat_processus)  instruction_prmd(struct_processus *s_etat_processus)
 {  {
       long                        i;
       long                        j;
     long                        longueur_utile;      long                        longueur_utile;
     long                        longueur_utile_limite;      long                        longueur_utile_limite;
   
     struct_objet                s_objet;      struct_objet                s_objet;
   
     unsigned long               i;  
     unsigned long               j;  
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
     if ((*s_etat_processus).affichage_arguments == 'Y')      if ((*s_etat_processus).affichage_arguments == 'Y')
Line 1342  instruction_psdev(struct_processus *s_et Line 1341  instruction_psdev(struct_processus *s_et
     struct_objet                        *s_objet_resultat;      struct_objet                        *s_objet_resultat;
     struct_objet                        *s_objet_temporaire;      struct_objet                        *s_objet_temporaire;
   
     unsigned long                       nombre_colonnes;      integer8                            nombre_colonnes;
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Line 1519  instruction_pvar(struct_processus *s_eta Line 1518  instruction_pvar(struct_processus *s_eta
     struct_objet                        *s_objet_resultat;      struct_objet                        *s_objet_resultat;
     struct_objet                        *s_objet_temporaire;      struct_objet                        *s_objet_temporaire;
   
     unsigned long                       nombre_colonnes;      integer8                            nombre_colonnes;
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Removed from v.1.46  
changed lines
  Added in v.1.47

CVSweb interface <joel.bertrand@systella.fr>