Do not export mariadb_st_internal_execute* functions

Now they are used only in dbdimp.c file, so mark them as static.
perl5-dbi · Nov 29, 2018 · 7e7a6d3 · 7e7a6d3
1 parent 3ec7432
commit 7e7a6d3
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 21 deletions.
diff --git a/dbdimp.c b/dbdimp.c
@@ -2513,6 +2513,9 @@ int mariadb_db_login6_sv(SV *dbh, imp_dbh_t *imp_dbh, SV *dsn, SV *user, SV *pas
 }
 
 
+static my_ulonglong mariadb_st_internal_execute(SV *h, char *sbuf, STRLEN slen, int num_params, imp_sth_ph_t *params, MYSQL_RES **result, MYSQL **svsock, bool use_mysql_use_result);
+static my_ulonglong mariadb_st_internal_execute41(SV *h, char *sbuf, STRLEN slen, bool has_params, MYSQL_RES **result, MYSQL_STMT **stmt_ptr, MYSQL_BIND *bind, MYSQL **svsock, bool *has_been_bound);
+
 /**************************************************************************
  *
  *  Name:    mariadb_db_do6
@@ -4171,7 +4174,7 @@ bool mariadb_st_more_results(SV* sth, imp_sth_t* imp_sth)
  **************************************************************************/
 
 
-my_ulonglong mariadb_st_internal_execute(
+static my_ulonglong mariadb_st_internal_execute(
                                        SV *h, /* could be sth or dbh */
                                        char *sbuf,
                                        STRLEN slen,
@@ -4312,7 +4315,7 @@ my_ulonglong mariadb_st_internal_execute(
  *
  **************************************************************************/
 
-my_ulonglong mariadb_st_internal_execute41(
+static my_ulonglong mariadb_st_internal_execute41(
                                          SV *h,
                                          char *sbuf,
                                          STRLEN slen,

diff --git a/dbdimp.h b/dbdimp.h
@@ -617,25 +617,6 @@ SV* mariadb_dr_my_ulonglong2sv(pTHX_ my_ulonglong val);
 
 void    mariadb_dr_do_error (SV* h, unsigned int rc, const char *what, const char *sqlstate);
 
-my_ulonglong mariadb_st_internal_execute(SV *,
-                                       char *,
-                                       STRLEN,
-                                       int,
-                                       imp_sth_ph_t *,
-                                       MYSQL_RES **,
-                                       MYSQL **,
-                                       bool);
-
-my_ulonglong mariadb_st_internal_execute41(SV *,
-                                         char *,
-                                         STRLEN,
-                                         bool,
-                                         MYSQL_RES **,
-                                         MYSQL_STMT **,
-                                         MYSQL_BIND *,
-                                         MYSQL **,
-                                         bool *);
-
 bool mariadb_st_more_results(SV*, imp_sth_t*);
 
 AV* mariadb_db_type_info_all(void);