/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        V E R I F I C A T I O N   D E   L ' E T A T   D E   C E R T A I N E S   R E S S O U R C E S   D U   S Y S T E M E  :       */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xcg/ressource.02$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 1995??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        M A C R O S   U T I L E S  :                                                                                               */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#define   TEST_COMMANDE(nom_de_la_commande,sequence_de_commande)                                                                        \
                    Bblock                                                                                                              \
                    Test(IFEQ_chaine(commande_courante,nom_de_la_commande))                                                             \
                         Bblock                                                                                                         \
                         BLOC(sequence_de_commande);                                                                                    \
                                        /* On execute la commande...                                                                 */ \
                         EGAL(on_a_trouve_une_commande_valide,VRAI);                                                                    \
                                        /* Et on memorise qu'on a rencontre une commande licite.                                     */ \
                         Eblock                                                                                                         \
                    ATes                                                                                                                \
                         Bblock                                                                                                         \
                         Eblock                                                                                                         \
                    ETes                                                                                                                \
                    Eblock                                                                                                              \
                                        /* Execution d'une commande quelconque si elle est reconnue...                               */