--- rpl/src/instructions_t1.c 2013/04/01 15:29:38 1.46 +++ rpl/src/instructions_t1.c 2013/04/07 21:09:02 1.47 @@ -59,11 +59,11 @@ instruction_type(struct_processus *s_eta printf(" 1: %s, %s, %s, %s, %s, %s,\n" " %s, %s, %s, %s, %s,\n" " %s, %s, %s, %s, %s,\n" - " %s, %s, %s, %s\n", + " %s, %s, %s, %s,\n" + " %s, %s, %s\n", d_INT, d_REL, d_CPL, d_VIN, d_VRL, d_VCX, d_MIN, d_MRL, d_MCX, - d_TAB, d_BIN, d_NOM, d_CHN, d_LST, d_ALG, d_RPN, d_FCH, d_SLB, d_SCK, - d_PRC); + d_PRC, d_TAB, d_SQL, d_MTX, d_SPH); printf("-> 1: %s\n\n", d_INT); if ((*s_etat_processus).langue == 'F') @@ -86,6 +86,9 @@ instruction_type(struct_processus *s_eta printf(" 14 : processus\n"); printf(" 15 : fonction\n"); printf(" 16 : table\n"); + printf(" 17 : connecteur SQL\n"); + printf(" 18 : mutex\n"); + printf(" 19 : sémaphore\n"); } else { @@ -107,6 +110,9 @@ instruction_type(struct_processus *s_eta printf(" 14 : process\n"); printf(" 15 : function\n"); printf(" 16 : table\n"); + printf(" 17 : SQL connector\n"); + printf(" 18 : mutex\n"); + printf(" 19 : semaphore\n"); } return; @@ -211,6 +217,18 @@ instruction_type(struct_processus *s_eta { (*((integer8 *) (*s_objet_resultat).objet)) = 16; } + else if ((*s_objet_argument).type == SQL) + { + (*((integer8 *) (*s_objet_resultat).objet)) = 17; + } + else if ((*s_objet_argument).type == MTX) + { + (*((integer8 *) (*s_objet_resultat).objet)) = 18; + } + else if ((*s_objet_argument).type == SPH) + { + (*((integer8 *) (*s_objet_resultat).objet)) = 19; + } else { /*