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>
26 lines
673 B
OCaml
26 lines
673 B
OCaml
type selector =
|
|
| By_id of Cli_primitive.db_id
|
|
| By_uuid of Cli_primitive.uuid
|
|
| By_ident of Cli_primitive.keyword
|
|
|
|
type opts = {
|
|
id : Cli_primitive.db_id option;
|
|
uuid : Cli_primitive.uuid option;
|
|
ident : Cli_primitive.keyword option;
|
|
}
|
|
|
|
type parsed = Parsed_pull of opts
|
|
|
|
type action =
|
|
| Debug_pull of {
|
|
repo : Cli_primitive.repo;
|
|
graph : Cli_primitive.graph;
|
|
lookup : selector;
|
|
selector : Melange_edn_melange.any;
|
|
}
|
|
|
|
val parse_ident_option : string -> Cli_primitive.keyword Error.build_result
|
|
val resolve_selector : opts -> selector Error.build_result
|
|
|
|
include Command_spec.S with type parsed := parsed and type action := action
|