Initial import of LogDarioSeq baseline

Establishes version control for the personal Logseq DB fork before
starting the server-client architecture migration and domain features
described in docs/agent-guide and the approved implementation plan.

Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
2026-08-25 15:32:15 +02:00
commit 40631362b3
2016 changed files with 543898 additions and 0 deletions

View File

@@ -0,0 +1,46 @@
(** Shared primitive aliases used by every layer. *)
type keyword = Melange_edn_melange.keyword Melange_edn_melange.t
type graph = private string
type repo = private string
type db_id = int64
type uuid = string
type path = string
type url = string
type email = string
type shell = Bash | Zsh
type port = int
type pid = int
type owner_source = Cli | Electron | Unknown | Other of string
type ds_where_clause =
| V of Melange_edn_melange.vector Melange_edn_melange.t
| L of Melange_edn_melange.list_ Melange_edn_melange.t
type datascript_query = private {
find : Melange_edn_melange.any Rrbvec.t;
in_ : Melange_edn_melange.symbol Melange_edn_melange.t Rrbvec.t option;
where : ds_where_clause Rrbvec.t;
}
val create_graph : string -> graph
val create_repo : string -> repo
(** repo is a string with prefix "logseq_db_" *)
val string_of_graph : graph -> string
val string_of_repo : repo -> string
val non_empty : string -> string option
val is_uuid_string : string -> bool
val shell_of_string : string -> shell option
val string_of_owner_source : owner_source -> string
val make_datascript_query :
find:Melange_edn_melange.any Rrbvec.t ->
?in_:Melange_edn_melange.symbol Melange_edn_melange.t Rrbvec.t ->
where:ds_where_clause Rrbvec.t ->
unit ->
datascript_query
val datascript_query_to_edn :
datascript_query -> Melange_edn_melange.vector Melange_edn_melange.t