Diff for /rpl/src/compilation.c between versions 1.56 and 1.57

version 1.56, 2013/03/17 22:26:43 version 1.57, 2013/03/20 17:11:43
Line 980  readline_effacement(int count, int key) Line 980  readline_effacement(int count, int key)
 */  */
   
 void  void
 swap(void *variable_1, void *variable_2, unsigned long taille)  swap(void *variable_1, void *variable_2, integer8 taille)
 {  {
     register unsigned char      *t_var_1;      register unsigned char      *t_var_1;
     register unsigned char      *t_var_2;      register unsigned char      *t_var_2;
     register unsigned char      variable_temporaire;      register unsigned char      variable_temporaire;
   
     register unsigned long      i;      register integer8           i;
   
     t_var_1 = (unsigned char *) variable_1;      t_var_1 = (unsigned char *) variable_1;
     t_var_2 = (unsigned char *) variable_2;      t_var_2 = (unsigned char *) variable_2;
Line 1748  recherche_instruction_suivante(struct_pr Line 1748  recherche_instruction_suivante(struct_pr
     pointeur_fin_instruction = pointeur_caractere_courant;      pointeur_fin_instruction = pointeur_caractere_courant;
   
     (*s_etat_processus).instruction_courante = (unsigned char *)      (*s_etat_processus).instruction_courante = (unsigned char *)
                 malloc(((pointeur_fin_instruction - pointeur_debut_instruction)                  malloc((((size_t) (pointeur_fin_instruction
                 + 1) * sizeof(unsigned char));                  - pointeur_debut_instruction)) + 1) * sizeof(unsigned char));
   
     if ((*s_etat_processus).instruction_courante == NULL)      if ((*s_etat_processus).instruction_courante == NULL)
     {      {
Line 1847  conversion_majuscule(unsigned char *chai Line 1847  conversion_majuscule(unsigned char *chai
   
 void  void
 conversion_majuscule_limitee(unsigned char *chaine_entree,  conversion_majuscule_limitee(unsigned char *chaine_entree,
         unsigned char *chaine_sortie, unsigned long longueur)          unsigned char *chaine_sortie, integer8 longueur)
 {  {
     unsigned long           i;      integer8            i;
   
     for(i = 0; i < longueur; i++)      for(i = 0; i < longueur; i++)
     {      {
Line 1893  initialisation_drapeaux(struct_processus Line 1893  initialisation_drapeaux(struct_processus
 {  {
     unsigned long                   i;      unsigned long                   i;
   
     for(i = 0; i < 31; cf(s_etat_processus, i++));      for(i = 0; i < 31; cf(s_etat_processus, (unsigned char) i++));
   
     if ((*s_etat_processus).lancement_interactif == d_vrai)      if ((*s_etat_processus).lancement_interactif == d_vrai)
     {      {

Removed from v.1.56  
changed lines
  Added in v.1.57


CVSweb interface <joel.bertrand@systella.fr>