rpl/src/instructions_c3.c - diff

Return to instructions_c3.c CVS log

Up to [local] / rpl / src

-version 1.33, 2011/11/18 10:36:14
+version 1.34, 2011/11/18 10:54:21
  Line 672  instruction_chr(struct_processus *s_etat
                  ((unsigned char *) (*s_objet_resultat).objet)[0] = '\\';
                  ((unsigned char *) (*s_objet_resultat).objet)[1] = '\\';
-                         (*((integer8 *) (*s_objet_argument).objet));
+                 ((unsigned char *) (*s_objet_resultat).objet)[2] =
+                         d_code_fin_chaine;
+             }
+             else if ((*((integer8 *) (*s_objet_argument).objet)) == '"')
+             {
+                 if (((*s_objet_resultat).objet = malloc(3 *
+                         sizeof(unsigned char))) == NULL)
+                 {
+                     (*s_etat_processus).erreur_systeme =
+                             d_es_allocation_memoire;
+                     return;
+                 }
+                 ((unsigned char *) (*s_objet_resultat).objet)[0] = '\\';
+                 ((unsigned char *) (*s_objet_resultat).objet)[1] = '"';
                  ((unsigned char *) (*s_objet_resultat).objet)[2] =
                          d_code_fin_chaine;
              }