--- rpl/src/instructions_c3.c 2011/11/18 10:36:14 1.33 +++ rpl/src/instructions_c3.c 2011/11/18 10:54:21 1.34 @@ -672,7 +672,21 @@ 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; }