@@ -950,7 +950,7 @@ NOALLOC_CONN_INFO(PQisnonblocking, Val_bool)
950
950
CAMLprim intnat PQsendQueryParams_stub (value v_conn , value v_query ,
951
951
value v_param_types , value v_params ,
952
952
value v_binary_params ,
953
- value v_binary_result ) {
953
+ value v_binary_result ) {
954
954
PGconn * conn = get_conn (v_conn );
955
955
const char * query = String_val (v_query );
956
956
size_t nparams = Wosize_val (v_params );
@@ -961,10 +961,10 @@ CAMLprim intnat PQsendQueryParams_stub(value v_conn, value v_query,
961
961
intnat res ;
962
962
copy_binary_params (v_params , v_binary_params , nparams , & formats , & lengths );
963
963
bool binary_result = Bool_val (v_binary_result );
964
- res = (nparams == 0 ) ? PQsendQuery ( conn , query )
965
- : PQsendQueryParams (conn , query , nparams , param_types ,
966
- params , lengths , formats ,
967
- binary_result );
964
+ res = (nparams == 0 )
965
+ ? PQsendQuery (conn , query )
966
+ : PQsendQueryParams ( conn , query , nparams , param_types , params ,
967
+ lengths , formats , binary_result );
968
968
if (param_types != NULL )
969
969
caml_stat_free (param_types );
970
970
free_binary_params (formats , lengths );
@@ -975,9 +975,10 @@ CAMLprim intnat PQsendQueryParams_stub(value v_conn, value v_query,
975
975
CAMLprim value PQsendQueryParams_stub_bc (value v_conn , value v_query ,
976
976
value v_param_types , value v_params ,
977
977
value v_binary_params ,
978
- value v_binary_result ) {
978
+ value v_binary_result ) {
979
979
return Val_int (PQsendQueryParams_stub (v_conn , v_query , v_param_types ,
980
- v_params , v_binary_params , v_binary_result ));
980
+ v_params , v_binary_params ,
981
+ v_binary_result ));
981
982
}
982
983
983
984
CAMLprim intnat PQsendPrepare_stub (value v_conn , value v_stm_name ,
@@ -1000,9 +1001,8 @@ CAMLprim value PQsendPrepare_stub_bc(value v_conn, value v_stm_name,
1000
1001
}
1001
1002
1002
1003
CAMLprim intnat PQsendQueryPrepared_stub (value v_conn , value v_stm_name ,
1003
- value v_params ,
1004
- value v_binary_params ,
1005
- value v_binary_result ) {
1004
+ value v_params , value v_binary_params ,
1005
+ value v_binary_result ) {
1006
1006
PGconn * conn = get_conn (v_conn );
1007
1007
const char * stm_name = String_val (v_stm_name );
1008
1008
size_t nparams = Wosize_val (v_params );
@@ -1011,9 +1011,8 @@ CAMLprim intnat PQsendQueryPrepared_stub(value v_conn, value v_stm_name,
1011
1011
intnat res ;
1012
1012
copy_binary_params (v_params , v_binary_params , nparams , & formats , & lengths );
1013
1013
bool binary_result = Bool_val (v_binary_result );
1014
- res =
1015
- PQsendQueryPrepared (conn , stm_name , nparams , params , lengths ,
1016
- formats , binary_result );
1014
+ res = PQsendQueryPrepared (conn , stm_name , nparams , params , lengths , formats ,
1015
+ binary_result );
1017
1016
free_binary_params (formats , lengths );
1018
1017
free_params_shallow (params , nparams );
1019
1018
return res ;
@@ -1022,10 +1021,9 @@ CAMLprim intnat PQsendQueryPrepared_stub(value v_conn, value v_stm_name,
1022
1021
CAMLprim value PQsendQueryPrepared_stub_bc (value v_conn , value v_stm_name ,
1023
1022
value v_params ,
1024
1023
value v_binary_params ,
1025
- value v_binary_result ) {
1026
- return Val_int (
1027
- PQsendQueryPrepared_stub (v_conn , v_stm_name , v_params ,
1028
- v_binary_params , v_binary_result ));
1024
+ value v_binary_result ) {
1025
+ return Val_int (PQsendQueryPrepared_stub (v_conn , v_stm_name , v_params ,
1026
+ v_binary_params , v_binary_result ));
1029
1027
}
1030
1028
1031
1029
#ifdef PG_OCAML_8_2
0 commit comments