scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

minor code clean-ups

This commit is contained in:
eknauel 2002-08-06 13:52:06 +00:00
parent 96b40e8846
commit 992bc80409
1 changed files with 1345 additions and 1345 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
scsh/odbc/odbc.c
View File

@ -1260,27 +1260,27 @@ s48_value odbc_sql_bind_parameter_exec_out(s48_value stmt_handle,
&value, 0, &cb_val);
break;
}
/* case SQL_C_NUMERIC: */
/* { */
/* SQL_NUMERIC_STRUCT value; */
/* SQLINTEGER cb_val; */
/* case SQL_C_NUMERIC: */
/* { */
/* SQL_NUMERIC_STRUCT value; */
/* SQLINTEGER cb_val; */
/* cb_val = 0; */
/* value.precision = (SQLCHAR) */
/* s48_extract_char(S48_RECORD_REF(S48_CAR(S48_VECTOR_REF(param_vals, i)), */
/* SR_SQL_NUMERIC_PRECISION)); */
/* cb_val = 0; */
/* value.precision = (SQLCHAR) */
/* s48_extract_char(S48_RECORD_REF(S48_CAR(S48_VECTOR_REF(param_vals, i)), */
/* SR_SQL_NUMERIC_PRECISION)); */
/* value.scale = (SQLSCHAR) */
/* s48_extract_char(S48_RECORD_REF(S48_CAR(S48_VECTOR_REF(param_vals, i)), */
/* SR_SQL_NUMERIC_SCALE)); */
/* value.scale = (SQLSCHAR) */
/* s48_extract_char(S48_RECORD_REF(S48_CAR(S48_VECTOR_REF(param_vals, i)), */
/* SR_SQL_NUMERIC_SCALE)); */
/* value.sign = (SQLCHAR) */
/* s48_extract_char(S48_RECORD_REF(S48_CAR(S48_VECTOR_REF(param_vals, i)), */
/* SR_SQL_NUMERIC_SIGN)); */
/* value.sign = (SQLCHAR) */
/* s48_extract_char(S48_RECORD_REF(S48_CAR(S48_VECTOR_REF(param_vals, i)), */
/* SR_SQL_NUMERIC_SIGN)); */
/* } */
/* } */
default:
{
@ -2195,7 +2195,7 @@ void s48_init_odbc(void)
/* S48_EXPORT_FUNCTION(odbc_sql_drivers); */
/* S48_EXPORT_FUNCTION(odbc_sql_get_info_int); */
/* S48_EXPORT_FUNCTION(odbc_sql_get_info_string); */
/* S48_EXPORT_FUNCTION(odbc_sql_get_func_exists); */
S48_EXPORT_FUNCTION(odbc_sql_get_func_exists);
/* S48_EXPORT_FUNCTION(odbc_sql_get_type_info); */
/* PART 3 */