diff options
Diffstat (limited to 'src/gsql_conn.c')
-rw-r--r-- | src/gsql_conn.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/gsql_conn.c b/src/gsql_conn.c index 4a48de7..3a44c18 100644 --- a/src/gsql_conn.c +++ b/src/gsql_conn.c | |||
@@ -22,7 +22,7 @@ | |||
22 | #include <guile-sql.h> | 22 | #include <guile-sql.h> |
23 | #include <app.h> | 23 | #include <app.h> |
24 | 24 | ||
25 | int num_iface; | 25 | static int num_iface; |
26 | struct sql_iface sql_iftab[MAX_IFACES]; | 26 | struct sql_iface sql_iftab[MAX_IFACES]; |
27 | 27 | ||
28 | SCM_GLOBAL_SYMBOL (gsql_error, "gsql-error"); | 28 | SCM_GLOBAL_SYMBOL (gsql_error, "gsql-error"); |
@@ -205,6 +205,9 @@ SCM_DEFINE (sql_query, "sql-query", 2, 0, 0, | |||
205 | int | 205 | int |
206 | sql_register_iface(struct sql_iface *ifp) | 206 | sql_register_iface(struct sql_iface *ifp) |
207 | { | 207 | { |
208 | int n = sql_find_iface(ifp->name); | ||
209 | if (n != -1) | ||
210 | return n; | ||
208 | if (num_iface >= MAX_IFACES) | 211 | if (num_iface >= MAX_IFACES) |
209 | scm_misc_error("sql_register_iface", | 212 | scm_misc_error("sql_register_iface", |
210 | "Too many ifaces registered", | 213 | "Too many ifaces registered", |