Skip to content

Commit 7eee35a

Browse files
committed
Fixed possible GC-issue when loadable extensions are unavailable
1 parent 016bc02 commit 7eee35a

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

lib/sqlite3.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -222,7 +222,7 @@ external clear_bindings : stmt -> Rc.t = "caml_sqlite3_clear_bindings"
222222
external busy_timeout : db -> int -> unit = "caml_sqlite3_busy_timeout"
223223

224224
external enable_load_extension :
225-
db -> bool -> bool = "caml_sqlite3_enable_load_extension" "noalloc"
225+
db -> bool -> bool = "caml_sqlite3_enable_load_extension"
226226

227227
let row_data stmt = Array.init (data_count stmt) (column stmt)
228228
let row_names stmt = Array.init (data_count stmt) (column_name stmt)

lib/sqlite3.mli

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -192,7 +192,7 @@ external db_close : db -> bool = "caml_sqlite3_close"
192192
*)
193193

194194
external enable_load_extension :
195-
db -> bool -> bool = "caml_sqlite3_enable_load_extension" "noalloc"
195+
db -> bool -> bool = "caml_sqlite3_enable_load_extension"
196196
(** [enable_load_extension db onoff] enable/disable the sqlite3 load
197197
extension. @return [false] if the operation fails, [true]
198198
otherwise. *)

0 commit comments

Comments
 (0)