/*************************************************************************************************************************************/ /* */ /* P O U R E V I T E R L ' E X I S T E N C E D E F O N C T I O N S N O N R E F E R E N C E E S : */ /* */ /* */ /* Author of '$xrv/champs_5.19$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 1992??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P O U R E V I T E R L ' E X I S T E N C E D E F O N C T I O N S N O N R E F E R E N C E E S : */ /* */ /* */ /* Nota : */ /* */ /* Ce qui suit est rendu necessaire par */ /* 'SYSTEME_ES9000_AIX_CC' qui remarque sinon */ /* l'existence de deux fonctions 'static' non */ /* referencees, ce qui donne le message */ /* */ /* Static function is not referenced. */ /* */ /* qu'il est preferable d'eviter... */ /* */ /* */ /*************************************************************************************************************************************/ Bblock TesF(TOUJOURS_FAUX) /* De facon a ne jamais passer ici... */ Bblock DEFV(Float,INIT(borne_inferieure,FLOT__UNDEF)); DEFV(Float,INIT(borne_superieure,FLOT__UNDEF)); DEFV(Float,INIT(valeur_aleatoire,FLOT__UNDEF)); /* Valeurs locales "bidons"... */ GENERATION_D_UNE_VALEUR(valeur_aleatoire,borne_inferieure,borne_superieure); /* Pour appeler au moins une fois la fonction 'generation_d_une_valeur(...)'. */ FIN_DE_L_INITIALISATION_DES_INTERPOLATIONS; /* Pour que la fonction 'f_PV_FIN_DE_L_INITIALISATION_DES_INTERPOLATIONS(...)' soit appelee */ /* au moins une fois... */ PRINT_ERREUR("on passe dans une sequence impossible"); Eblock ATes Bblock Eblock ETes Eblock