/*************************************************************************************************************************************/ /* */ /* T E S T D E S F O N C T I O N S D E T Y P E ' chain_Aconcaten*(...) ' : */ /* */ /* */ /* Author of '$xtKg/chain_Aconcaten.01$K' : */ /* */ /* Jean-Francois COLONNA (LACTAMME, 20180322081543). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* I N T E R F A C E ' listG ' : */ /* */ /* */ /* :Debut_listG: */ /* :Fin_listG: */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* D I R E C T I V E S S P E C I F I Q U E S D E C O M P I L A T I O N : */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* F I C H I E R S D ' I N C L U D E S : */ /* */ /*************************************************************************************************************************************/ #include INCLUDES_BASE /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P A R A M E T R E S : */ /* */ /*************************************************************************************************************************************/ #define PRINT(fonction) \ Bblock \ printf("%s\n",fonction); \ Eblock /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* T E S T D E S F O N C T I O N S D E T Y P E ' chain_Aconcaten*(...) ' : */ /* */ /*************************************************************************************************************************************/ BCommande(nombre_d_arguments,arguments) /*-----------------------------------------------------------------------------------------------------------------------------------*/ Bblock DEFV(CHAR,INIT(POINTERc(c01),"A ")); DEFV(CHAR,INIT(POINTERc(c02),"B ")); DEFV(CHAR,INIT(POINTERc(c03),"C ")); DEFV(CHAR,INIT(POINTERc(c04),"D ")); DEFV(CHAR,INIT(POINTERc(c05),"E ")); DEFV(CHAR,INIT(POINTERc(c06),"F ")); DEFV(CHAR,INIT(POINTERc(c07),"G ")); DEFV(CHAR,INIT(POINTERc(c08),"H ")); DEFV(CHAR,INIT(POINTERc(c09),"I ")); DEFV(CHAR,INIT(POINTERc(c10),"J ")); DEFV(CHAR,INIT(POINTERc(c11),"K ")); DEFV(CHAR,INIT(POINTERc(c12),"L ")); DEFV(CHAR,INIT(POINTERc(c13),"M ")); DEFV(CHAR,INIT(POINTERc(c14),"N ")); DEFV(CHAR,INIT(POINTERc(c15),"O ")); DEFV(CHAR,INIT(POINTERc(c16),"P ")); DEFV(CHAR,INIT(POINTERc(c17),"Q ")); DEFV(CHAR,INIT(POINTERc(c18),"R ")); DEFV(CHAR,INIT(POINTERc(c19),"S ")); DEFV(CHAR,INIT(POINTERc(c20),"T ")); DEFV(CHAR,INIT(POINTERc(c21),"U ")); DEFV(CHAR,INIT(POINTERc(c22),"V ")); /*..............................................................................................................................*/ GET_ARGUMENTS_(nombre_d_arguments ,BLOC(VIDE;) ); PRINT(chain_Aconcaten1(c01)); PRINT(chain_Aconcaten2(c01,c02)); PRINT(chain_Aconcaten3(c01,c02,c03)); PRINT(chain_Aconcaten4(c01,c02,c03,c04)); PRINT(chain_Aconcaten5(c01,c02,c03,c04,c05)); PRINT(chain_Aconcaten6(c01,c02,c03,c04,c05,c06)); PRINT(chain_Aconcaten7(c01,c02,c03,c04,c05,c06,c07)); PRINT(chain_Aconcaten8(c01,c02,c03,c04,c05,c06,c07,c08)); PRINT(chain_Aconcaten9(c01,c02,c03,c04,c05,c06,c07,c08,c09)); PRINT(chain_Aconcaten10(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10)); PRINT(chain_Aconcaten11(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11)); PRINT(chain_Aconcaten12(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12)); PRINT(chain_Aconcaten13(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13)); PRINT(chain_Aconcaten14(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14)); PRINT(chain_Aconcaten15(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15)); PRINT(chain_Aconcaten16(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16)); PRINT(chain_Aconcaten17(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16,c17)); PRINT(chain_Aconcaten18(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16,c17,c18)); PRINT(chain_Aconcaten19(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16,c17,c18,c19)); PRINT(chain_Aconcaten20(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16,c17,c18,c19,c20)); PRINT(chain_Aconcaten21(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16,c17,c18,c19,c20,c21)); PRINT(chain_Aconcaten22(c01,c02,c03,c04,c05,c06,c07,c08,c09,c10,c11,c12,c13,c14,c15,c16,c17,c18,c19,c20,c21,c22)); RETU_Commande; Eblock ECommande