--- rpl/src/compilation.c 2015/01/28 21:47:26 1.75 +++ rpl/src/compilation.c 2015/01/29 09:33:41 1.76 @@ -1493,17 +1493,22 @@ recherche_instruction_suivante_recursive ((*(pointeur_caractere_courant - 1)) == d_code_espace)) { - if ((*(++pointeur_caractere_courant)) == '>') - { + pointeur_caractere_courant++; + + if ((*pointeur_caractere_courant) == '>') + { // Cas de '>>' drapeau_fin_objet = d_vrai; + pointeur_caractere_courant++; + break; } - else - { + else if ((*pointeur_caractere_courant) != + d_code_espace) + { // Tous les cas différents de '>' erreur_analyse = d_ex_syntaxe; + break; } - pointeur_caractere_courant++; - break; + pointeur_caractere_courant--; } if ((erreur_format == d_absence_erreur) &&