(*---------------------------------------------------------------------------
   Copyright (c) 2025 Thomas Gazagnaire. All rights reserved.
   SPDX-License-Identifier: MIT
  ---------------------------------------------------------------------------*)

(** SQLite-backed blockstore implementing [Atp.Blockstore.writable]. *)

val v : Sqlite.Table.t -> Atp.Blockstore.writable
(** [v blocks] creates a writable blockstore backed by SQLite. *)