Skip to content

Commit

Permalink
Switched to ocamlformat 0.27.0
Browse files Browse the repository at this point in the history
  • Loading branch information
mmottl committed Dec 8, 2024
1 parent 3e53d79 commit 4e79a87
Show file tree
Hide file tree
Showing 3 changed files with 12 additions and 9 deletions.
2 changes: 1 addition & 1 deletion .ocamlformat
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
version = 0.26.2
version = 0.27.0
profile = conventional

# Default overrides
Expand Down
9 changes: 6 additions & 3 deletions src/sqlite3.mli
Original file line number Diff line number Diff line change
Expand Up @@ -63,7 +63,8 @@ val sqlite_version : unit -> int
val sqlite_version_info : unit -> string
(** [sqlite_version_info ()]
@return
the version of the SQLite3 library being used in a human-readable string. *)
the version of the SQLite3 library being used in a human-readable string.
*)

(** {2 Types} *)

Expand Down Expand Up @@ -235,7 +236,8 @@ module Data : sig

val to_string : t -> string option
(** [to_string data] converts [data] to [Some string] or [None] if it is not a
valid conversion. This method also converts data of type BLOB to a string. *)
valid conversion. This method also converts data of type BLOB to a string.
*)

val to_int : t -> int option
(** [to_int data] converts [data] to [Some int] or [None] if it is not a valid
Expand Down Expand Up @@ -330,7 +332,8 @@ val ( let& ) : db -> (db -> 'a) -> 'a
database [db] is safely closed at the end of the scope, even if there is an
exception somewhere in the scope.
@raise Fun.Finally_raised if the database could not be closed successfully. *)
@raise Fun.Finally_raised if the database could not be closed successfully.
*)

val enable_load_extension : db -> bool -> bool
(** [enable_load_extension db onoff] enable/disable the SQLite3 load extension.
Expand Down
10 changes: 5 additions & 5 deletions test/test_stmt.ml
Original file line number Diff line number Diff line change
Expand Up @@ -10,11 +10,11 @@ let column_decltype s i =
let stepbystep s =
assert_done
(iter s ~f:(function r ->
Array.iteri
(fun i c ->
printf "%s column[%d] %s = %s\n%!" (column_decltype s i) i
(column_name s i) (Data.to_string_coerce c))
r))
Array.iteri
(fun i c ->
printf "%s column[%d] %s = %s\n%!" (column_decltype s i) i
(column_name s i) (Data.to_string_coerce c))
r))

let stepbystep_wrong s =
while step s = Rc.ROW do
Expand Down

0 comments on commit 4e79a87

Please sign in to comment.