rpl/src/instructions_r7.c - diff

Return to instructions_r7.c CVS log

Up to [local] / rpl / src

version 1.2, 2011/12/01 15:23:49	version 1.4, 2011/12/07 12:25:26
Line 195 instruction_regex(struct_processus *s_et	Line 195 instruction_regex(struct_processus *s_et
return;	return;
}	}

if (regexec(&expression, (const char ) (s_objet_argument_1).objet,	if (regexec(&expression, (const char ) (s_objet_argument_2).objet,
0, NULL, 0) == 0)	0, NULL, 0) == 0)
{	{
(((integer8 ) (*s_objet_resultat).objet)) = -1;	(((integer8 ) (*s_objet_resultat).objet)) = -1;
Line 235 instruction_regex(struct_processus *s_et	Line 235 instruction_regex(struct_processus *s_et
{	{
if (((l_element_courant_lecture).donnee).type != CHN)	if (((l_element_courant_lecture).donnee).type != CHN)
{	{
	regfree(&expression);
liberation(s_etat_processus, s_objet_argument_1);	liberation(s_etat_processus, s_objet_argument_1);
liberation(s_etat_processus, s_objet_argument_2);	liberation(s_etat_processus, s_objet_argument_2);
liberation(s_etat_processus, s_objet_resultat);	liberation(s_etat_processus, s_objet_resultat);