Fixed SQLDescribeCol (odbc-sql-describe-col)

This commit is contained in:
eknauel 2002-09-03 12:33:17 +00:00
parent 9772b62b54
commit a76fdbfe59
2 changed files with 5 additions and 1 deletions

View File

@ -2063,9 +2063,13 @@ s48_value struct_to_sql_timestamp_record(SQL_TIMESTAMP_STRUCT *ts)
void s48_init_odbc(void)
{
/* bindings for record types */
S48_GC_PROTECT_GLOBAL(odbc_diag_record_type);
odbc_diag_record_type = s48_get_imported_binding("odbc-diag");
S48_GC_PROTECT_GLOBAL(odbc_column_record_type);
odbc_column_record_type = s48_get_imported_binding("odbc-column");
/* PART 1 */
S48_EXPORT_FUNCTION(odbc_alloc_environment_handle);
S48_EXPORT_FUNCTION(odbc_alloc_connection_handle);

View File

@ -317,7 +317,7 @@ s48_value struct_to_sql_time_record(SQL_TIME_STRUCT *ts);
/* convert Scheme sql-timestamp record to SQL_TIMESTAMP_STRUCT */
void sql_timestamp_record_to_struct(s48_value sql_timestamp,
SQL_TIMESTAMP_STRUCT *ts);
SQL_TIMESTAMP_STRUCT *ts);
void s48_init_odbc(void);