rem: sort_result = classement_sliste_par_date_rp ( operation_1, operation_2 );
add: sort_result = classement_sliste_par_date ( operation_1, operation_2 );
context: gint classement_sliste_par_tri_courant ( struct structure_operation *operation_1,					 struct structure_operation *operation_2 ){  gint pos_type_ope_1;  gint pos_type_ope_2;  gint buffer;  gint sort_result;  p_tab_nom_de_compte_variable = p_tab_nom_de_compte_courant;  /* On classe soit par le tri dsir, soit par date,     et dans ce cas on renvoie au tri normal */  if ( !TRI || !LISTE_TRI )    sort_result = classement_sliste_par_date_rp ( operation_1, operation_2 );  else    {     /* si l'opration est ngative et que le type est neutre et que les types        neutres sont spars, on lui met la position du type ngatif */     if ( operation_1 -> montant < 0	  && ( buffer = g_slist_index ( LISTE_TRI, GINT_TO_POINTER ( -operation_1 -> type_ope ))) != -1 )       pos_type_ope_1 = buffer;     else       pos_type_ope_1 = g_slist_index ( LISTE_TRI, GINT_TO_POINTER ( operation_1 -> type_ope ));     if ( operation_2 -> montant < 0	  && ( buffer = g_slist_index ( LISTE_TRI, GINT_TO_POINTER ( -operation_2 -> type_ope ))) != -1 )       pos_type_ope_2 = buffer;     else       pos_type_ope_2 = g_slist_index ( LISTE_TRI, GINT_TO_POINTER ( operation_2 -> type_ope ));     /* s'elles ont le mme type, on les classe par date */     if ( pos_type_ope_1 == pos_type_ope_2 )       {	sort_result = classement_sliste_par_date_rp ( operation_1, operation_2 );       }     else       {	if ( pos_type_ope_1 < pos_type_ope_2 )	  sort_result = -1;	else	  sort_result = 1;       }    }  return( sort_result );}