aboutsummaryrefslogtreecommitdiff
path: root/src/gsql_conn.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/gsql_conn.c')
-rw-r--r--src/gsql_conn.c5
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
25int num_iface; 25static int num_iface;
26struct sql_iface sql_iftab[MAX_IFACES]; 26struct sql_iface sql_iftab[MAX_IFACES];
27 27
28SCM_GLOBAL_SYMBOL (gsql_error, "gsql-error"); 28SCM_GLOBAL_SYMBOL (gsql_error, "gsql-error");
@@ -205,6 +205,9 @@ SCM_DEFINE (sql_query, "sql-query", 2, 0, 0,
205int 205int
206sql_register_iface(struct sql_iface *ifp) 206sql_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",

Return to:

Send suggestions and report system problems to the System administrator.