diff --git a/scsh/odbc/odbc.scm b/scsh/odbc/odbc.scm index 8ee5df2..9f76c10 100644 --- a/scsh/odbc/odbc.scm +++ b/scsh/odbc/odbc.scm @@ -871,8 +871,9 @@ "odbc_sql_row_count") (define (odbc-sql-get-data stmt-handle column-number target-type) - (odbc-sql-get-data-internal (statement-handle-handle stmt-handle) - column-number target-type)) + (apply values + (odbc-sql-get-data-internal (statement-handle-handle stmt-handle) + column-number target-type))) (import-lambda-definition odbc-sql-get-data-internal (stmt-handle column-number target-type)