--- rpl/src/interface_cas.cpp 2020/01/16 08:57:42 1.64 +++ rpl/src/interface_cas.cpp 2020/06/04 09:35:35 1.65 @@ -133,8 +133,8 @@ conversion_rpl_vers_cas(struct_processus liberation(s_etat_processus, *s_objet); - if (depilement(s_etat_processus, &(s_etat_processus - ->l_base_pile), s_objet) == d_erreur) + if (depilement(s_etat_processus, &(s_etat_processus->l_base_pile), + s_objet) == d_erreur) { return(NULL); } @@ -464,6 +464,9 @@ interface_cas(struct_processus *s_etat_p contexte = reinterpret_cast( s_etat_processus->contexte_cas); + giac::angle_radian((test_cfsf(s_etat_processus, 60) == d_vrai) ? 1 : 0, + contexte); + if ((s_etat_processus->erreur_execution != d_ex) || (s_etat_processus->erreur_systeme != d_es)) {