/*************************************************************************************************************************************/ /* */ /* O U T I L S D E C O M P R E S S I O N / D E C O M P R E S S I O N O P T I M A L E : */ /* */ /* */ /* Author of '$xrC/CompressionDeCompressionOptimale.01$vv$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 20130716090530). */ /* */ /*************************************************************************************************************************************/ #include "CompressionDeCompression.01.vv.I" #define PostFixe_CDC__0X \ Fgetenv("PostFixe_CDC__0X") /* Definition du couple {compresseur,decompresseur} X. */ #define NETTOYAGE(PostFixe) \ { \ if (LongueurFichier(CONCATENE_CHAINE_02(NOM_DU_FICHIER,PostFixe),FAUX) > TailleFichierCompresseLePlusCourt) \ { \ EXECUTION_COMMANDE(CONCATENE_CHAINE_04(DELETE,ESPACE,NOM_DU_FICHIER,PostFixe)); \ } \ else \ { \ EXECUTION_COMMANDE(CONCATENE_CHAINE_04(DELETE,ESPACE,NOM_DU_FICHIER,PostFixe_CDC__0X)); \ EXECUTION_COMMANDE(CONCATENE_CHAINE_07(CP,ESPACE \ ,NOM_DU_FICHIER,PostFixe,ESPACE \ ,NOM_DU_FICHIER,PostFixe_CDC__0X \ ) \ ); \ } \ } \ /* Suppression des fichiers compresses les plus longs. */