rpl/src/instructions_s1.c - diff

Return to instructions_s1.c CVS log

Up to [local] / rpl / src

version 1.116, 2020/11/01 08:51:41	version 1.117, 2020/11/04 14:16:50
Line 3667 instruction_syseval(struct_processus *s_	Line 3667 instruction_syseval(struct_processus *s_
.instruction_courante;	.instruction_courante;

/*	/*
* S'il y a des guillemets en début de chaîne, il y en	* S'il y a des guillemets ou une apostrophe en début de
* a aussi à la fin de la chaîne et on les ôte. Les	* chaîne, il y en * a aussi à la fin de la chaîne et on les
* guillements intermédiaires sont protégés par une	* ôte. Les guillements intermédiaires sont protégés par une
* séquence d'échappement qui est enlevée.	* séquence d'échappement qui est enlevée.
*/	*/

if ((*s_etat_processus).instruction_courante[0] == '"')	if (((*s_etat_processus).instruction_courante[0] == '"') \|\|
	((*s_etat_processus).instruction_courante[0] == '\''))
{	{
if (strlen((*s_etat_processus).instruction_courante) >= 2)	if (strlen((*s_etat_processus).instruction_courante) >= 2)
{	{
Line 3805 instruction_syseval(struct_processus *s_	Line 3806 instruction_syseval(struct_processus *s_
(*s_etat_processus).erreur_systeme = d_es_signal;	(*s_etat_processus).erreur_systeme = d_es_signal;
return;	return;
}	}
instruction_clmf(s_etat_processus);

verrouillage_threads_concurrents(s_etat_processus);	verrouillage_threads_concurrents(s_etat_processus);