version 1.64, 2012/12/17 21:22:44
|
version 1.68, 2013/02/26 19:56:16
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.11 |
RPL/2 (R) version 4.1.12 |
Copyright (C) 1989-2012 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 657 instruction_sqlconnect(struct_processus
|
Line 657 instruction_sqlconnect(struct_processus
|
|
|
printf(" { \"mysql\" \"server\" \"database\" " |
printf(" { \"mysql\" \"server\" \"database\" " |
"\"user\" \"password\" } SQLCONNECT\n"); |
"\"user\" \"password\" } SQLCONNECT\n"); |
|
printf(" { \"sqlite\" \"file\" } SQLCONNECT\n"); |
printf(" { \"postgresql:iso-8859-1\" \"server\" " |
printf(" { \"postgresql:iso-8859-1\" \"server\" " |
"\"database\" \"user\" \"password\" port }\n"); |
"\"database\" \"user\" \"password\" port }\n"); |
printf(" SQLCONNECT\n"); |
printf(" SQLCONNECT\n"); |
Line 889 instruction_sqldisconnect(struct_process
|
Line 890 instruction_sqldisconnect(struct_process
|
drapeau = d_faux; |
drapeau = d_faux; |
# endif |
# 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 |
else |
{ |
{ |
BUG(1, printf("SQL type '%s' not allowed!", |
BUG(1, printf("SQL type '%s' not allowed!", |