rpl/src/instructions_e2.c - diff

Return to instructions_e2.c CVS log

Up to [local] / rpl / src

version 1.2, 2010/01/27 22:22:13	version 1.3, 2010/02/10 08:09:29
Line 738 instruction_edit(struct_processus *s_eta	Line 738 instruction_edit(struct_processus *s_eta
unsigned char *chaine;	unsigned char *chaine;
unsigned char *commande;	unsigned char *commande;
unsigned char *nom_fichier;	unsigned char *nom_fichier;
	unsigned char registre;

(*s_etat_processus).erreur_execution = d_ex;	(*s_etat_processus).erreur_execution = d_ex;

Line 848 instruction_edit(struct_processus *s_eta	Line 849 instruction_edit(struct_processus *s_eta
return;	return;
}	}

	registre = (*s_etat_processus).autorisation_conversion_chaine;
	(*s_etat_processus).autorisation_conversion_chaine = 'N';

if ((chaine = formateur(s_etat_processus, 0, s_objet)) == NULL)	if ((chaine = formateur(s_etat_processus, 0, s_objet)) == NULL)
{	{
	(*s_etat_processus).autorisation_conversion_chaine = registre;

(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;	(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
return;	return;
}	}

	(*s_etat_processus).autorisation_conversion_chaine = registre;

if ((*s_objet).type == CHN)	if ((*s_objet).type == CHN)
{	{
if (fprintf(fichier, "\"%s\"\n", chaine) != (int) (strlen(chaine) + 3))	if (fprintf(fichier, "\"%s\"\n", chaine) != (int) (strlen(chaine) + 3))