Diff for /rpl/src/instructions_p3.c between versions 1.2 and 1.3

version 1.2, 2010/01/27 22:22:15 version 1.3, 2010/02/10 08:09:29
Line 1640  instruction_prompt(struct_processus *s_e Line 1640  instruction_prompt(struct_processus *s_e
     struct_objet                *s_objet_resultat;      struct_objet                *s_objet_resultat;
   
     unsigned char               *tampon;      unsigned char               *tampon;
       unsigned char               *tampon2;
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Line 1684  instruction_prompt(struct_processus *s_e Line 1685  instruction_prompt(struct_processus *s_e
   
     if ((*s_objet_argument).type == CHN)      if ((*s_objet_argument).type == CHN)
     {      {
           if ((tampon = formateur(s_etat_processus, 0, s_objet_argument)) == NULL)
           {
               (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
               return;
           }
   
           if ((tampon2 = transliteration(s_etat_processus, tampon,
                   d_locale, (*s_etat_processus).localisation)) == NULL)
           {
               free(tampon);
   
               (*s_etat_processus).erreur_execution = d_ex_erreur_transcodage;
               return;
           }
   
           free(tampon);
   
         if ((s_objet_resultat = allocation(s_etat_processus, CHN)) == NULL)          if ((s_objet_resultat = allocation(s_etat_processus, CHN)) == NULL)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;              (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
Line 1693  instruction_prompt(struct_processus *s_e Line 1711  instruction_prompt(struct_processus *s_e
         flockfile(stdin);          flockfile(stdin);
         flockfile(stdout);          flockfile(stdout);
   
         (*s_objet_resultat).objet = (void *) readline((unsigned char *)          (*s_objet_resultat).objet = (void *) readline(tampon2);
                 (*s_objet_argument).objet);  
   
         funlockfile(stdin);          funlockfile(stdin);
         funlockfile(stdout);          funlockfile(stdout);
   
           free(tampon2);
   
         if ((*s_objet_resultat).objet == NULL)          if ((*s_objet_resultat).objet == NULL)
         {          {
             if (((*s_objet_resultat).objet = malloc(sizeof(unsigned char)))              if (((*s_objet_resultat).objet = malloc(sizeof(unsigned char)))

Removed from v.1.2  
changed lines
  Added in v.1.3


CVSweb interface <joel.bertrand@systella.fr>