--- rpl/src/instructions_s10.c 2012/12/19 09:58:26 1.66 +++ rpl/src/instructions_s10.c 2012/12/20 15:32:52 1.67 @@ -657,6 +657,7 @@ instruction_sqlconnect(struct_processus printf(" { \"mysql\" \"server\" \"database\" " "\"user\" \"password\" } SQLCONNECT\n"); + printf(" { \"sqlite\" \"file\" } SQLCONNECT\n"); printf(" { \"postgresql:iso-8859-1\" \"server\" " "\"database\" \"user\" \"password\" port }\n"); printf(" SQLCONNECT\n"); @@ -889,6 +890,21 @@ instruction_sqldisconnect(struct_process drapeau = d_faux; # endif } + else if (strcmp((*((struct_connecteur_sql *) (*s_objet).objet)) + .type, "SQLITE") == 0) + { + if ((*((struct_connecteur_sql *) (*(*l_element_courant) + .donnee).objet)).descripteur.sqlite == + (*((struct_connecteur_sql *) (*s_objet).objet)) + .descripteur.sqlite) + { + drapeau = d_vrai; + } + else + { + drapeau = d_faux; + } + } else { BUG(1, printf("SQL type '%s' not allowed!",