diff options
Diffstat (limited to 'src/pgsql.c')
-rw-r--r-- | src/pgsql.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pgsql.c b/src/pgsql.c index 2a7fe23..c1a8e41 100644 --- a/src/pgsql.c +++ b/src/pgsql.c | |||
@@ -137,7 +137,7 @@ s_pgsql_query(struct sql_connect *conn, const char *query) | |||
137 | switch (stat) { | 137 | switch (stat) { |
138 | case PGRES_COMMAND_OK: | 138 | case PGRES_COMMAND_OK: |
139 | /* Successful completion of a command returning no data */ | 139 | /* Successful completion of a command returning no data */ |
140 | cell = scm_makenum(strtoul(PQcmdTuples(res), NULL, 0)); | 140 | cell = scm_to_ulong(strtoul(PQcmdTuples(res), NULL, 0)); |
141 | break; | 141 | break; |
142 | case PGRES_TUPLES_OK: | 142 | case PGRES_TUPLES_OK: |
143 | /* The query successfully executed */ | 143 | /* The query successfully executed */ |