rpl/src/formateur_fichiers.c - diff

Return to formateur_fichiers.c CVS log

Up to [local] / rpl / src

version 1.43, 2012/06/22 10:12:19	version 1.48, 2012/12/19 09:58:23
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.9	RPL/2 (R) version 4.1.12
Copyright (C) 1989-2012 Dr. BERTRAND Joël	Copyright (C) 1989-2012 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.
Line 1496 formateur_fichier(struct_processus *s_et	Line 1496 formateur_fichier(struct_processus *s_et
return(NULL);	return(NULL);
}	}

position_3 = strlen(format_chaine);	position_3 = strlen(format_chaine) - 1;

if (format_chaine[position_3] != ')')	if (format_chaine[position_3] != ')')
{	{
Line 1508 formateur_fichier(struct_processus *s_et	Line 1508 formateur_fichier(struct_processus *s_et
return(NULL);	return(NULL);
}	}

format_chaine[--position_3] = d_code_fin_chaine;	format_chaine[position_3] = d_code_fin_chaine;

position_2 = position_1;	position_2 = position_1;