version 1.71, 2014/07/24 14:38:43
|
version 1.72, 2015/01/05 13:12:31
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.19 |
RPL/2 (R) version 4.1.19 |
Copyright (C) 1989-2014 Dr. BERTRAND Joël |
Copyright (C) 1989-2015 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 757 formateur(struct_processus *s_etat_proce
|
Line 757 formateur(struct_processus *s_etat_proce
|
{ |
{ |
if ((strcmp(chaine_fonction, "AND") == 0) || |
if ((strcmp(chaine_fonction, "AND") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
|
(strcmp(chaine_fonction, "EQV") == 0) || |
(strcmp(chaine_fonction, "OR") == 0)) |
(strcmp(chaine_fonction, "OR") == 0)) |
{ |
{ |
autorisation_parenthese = d_vrai; |
autorisation_parenthese = d_vrai; |
Line 783 formateur(struct_processus *s_etat_proce
|
Line 784 formateur(struct_processus *s_etat_proce
|
(strcmp(chaine_fonction, "-") == 0) || |
(strcmp(chaine_fonction, "-") == 0) || |
(strcmp(chaine_fonction, "AND") == 0) || |
(strcmp(chaine_fonction, "AND") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
|
(strcmp(chaine_fonction, "EQV") == 0) || |
(strcmp(chaine_fonction, "OR") == 0)) |
(strcmp(chaine_fonction, "OR") == 0)) |
{ |
{ |
autorisation_parenthese = d_vrai; |
autorisation_parenthese = d_vrai; |
Line 919 formateur(struct_processus *s_etat_proce
|
Line 921 formateur(struct_processus *s_etat_proce
|
{ |
{ |
if ((strcmp(chaine_fonction, "AND") == 0) || |
if ((strcmp(chaine_fonction, "AND") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
|
(strcmp(chaine_fonction, "EQV") == 0) || |
(strcmp(chaine_fonction, "OR") == 0)) |
(strcmp(chaine_fonction, "OR") == 0)) |
{ |
{ |
autorisation_parenthese = d_vrai; |
autorisation_parenthese = d_vrai; |
Line 935 formateur(struct_processus *s_etat_proce
|
Line 938 formateur(struct_processus *s_etat_proce
|
(strcmp(chaine_fonction, "-") == 0) || |
(strcmp(chaine_fonction, "-") == 0) || |
(strcmp(chaine_fonction, "AND") == 0) || |
(strcmp(chaine_fonction, "AND") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0) || |
|
(strcmp(chaine_fonction, "EQV") == 0) || |
(strcmp(chaine_fonction, "OR") == 0)) |
(strcmp(chaine_fonction, "OR") == 0)) |
{ |
{ |
autorisation_parenthese = d_vrai; |
autorisation_parenthese = d_vrai; |
Line 1161 formateur(struct_processus *s_etat_proce
|
Line 1165 formateur(struct_processus *s_etat_proce
|
(*(*l_element_courant).donnee).objet)).nom_fonction, |
(*(*l_element_courant).donnee).objet)).nom_fonction, |
"XOR") == 0) || (strcmp((*((struct_fonction *) |
"XOR") == 0) || (strcmp((*((struct_fonction *) |
(*(*l_element_courant).donnee).objet)).nom_fonction, |
(*(*l_element_courant).donnee).objet)).nom_fonction, |
|
"EQV") == 0) || (strcmp((*((struct_fonction *) |
|
(*(*l_element_courant).donnee).objet)).nom_fonction, |
"AND") == 0)) |
"AND") == 0)) |
{ |
{ |
if (depilement(s_etat_processus, &((*s_etat_processus) |
if (depilement(s_etat_processus, &((*s_etat_processus) |
Line 1251 formateur(struct_processus *s_etat_proce
|
Line 1257 formateur(struct_processus *s_etat_proce
|
} |
} |
|
|
if (((strcmp(chaine_fonction, "OR") == 0) || |
if (((strcmp(chaine_fonction, "OR") == 0) || |
|
(strcmp(chaine_fonction, "EQV") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0)) && |
(strcmp(chaine_fonction, "XOR") == 0)) && |
(strcmp((*((struct_fonction *) |
(strcmp((*((struct_fonction *) |
(*(*l_element_courant).donnee).objet)) |
(*(*l_element_courant).donnee).objet)) |
Line 1327 formateur(struct_processus *s_etat_proce
|
Line 1334 formateur(struct_processus *s_etat_proce
|
} |
} |
|
|
if (((strcmp(chaine_fonction, "OR") == 0) || |
if (((strcmp(chaine_fonction, "OR") == 0) || |
|
(strcmp(chaine_fonction, "EQV") == 0) || |
(strcmp(chaine_fonction, "XOR") == 0)) && |
(strcmp(chaine_fonction, "XOR") == 0)) && |
(strcmp((*((struct_fonction *) |
(strcmp((*((struct_fonction *) |
(*(*l_element_courant).donnee).objet)) |
(*(*l_element_courant).donnee).objet)) |