rpl/src/types.c - diff

Return to types.c CVS log

Up to [local] / rpl / src

version 1.53, 2012/12/18 13:19:40	version 1.56, 2013/02/27 14:28:29
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.12	RPL/2 (R) version 4.1.12
Copyright (C) 1989-2012 Dr. BERTRAND Joël	Copyright (C) 1989-2013 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.

Line 2222 recherche_type(struct_processus *s_etat_	Line 2222 recherche_type(struct_processus *s_etat_
if ((*s_etat_processus).definitions_chainees	if ((*s_etat_processus).definitions_chainees
[(*s_etat_processus).position_courante] == '"')	[(*s_etat_processus).position_courante] == '"')
{	{
if (drapeau_chaine == d_faux)	if ((*s_etat_processus).position_courante > 0)
{	{
drapeau_chaine = d_vrai;	if ((*s_etat_processus).definitions_chainees
	[(*s_etat_processus).position_courante - 1]
	!= '\\')
	{
	if (drapeau_chaine == d_faux)
	{
	drapeau_chaine = d_vrai;
	}
	else
	{
	drapeau_chaine = d_faux;
	}
	}
}	}
else	else
{	{
drapeau_chaine = d_faux;	if (drapeau_chaine == d_faux)
	{
	drapeau_chaine = d_vrai;
	}
	else
	{
	drapeau_chaine = d_faux;
	}
}	}
}	}
else if (drapeau_chaine == d_faux)	else if (drapeau_chaine == d_faux)