Dasemu
40631362b3
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>
23 lines
717 B
OCaml
23 lines
717 B
OCaml
type opts = { dev_script : bool }
|
|
type parsed = Parsed_doctor of opts
|
|
type action = Doctor of { script_path : Cli_primitive.path option }
|
|
type check_status = Ok | Warning | Error
|
|
|
|
type check = {
|
|
id : Cli_primitive.keyword;
|
|
status : check_status;
|
|
code : Error.code option;
|
|
message : string;
|
|
path : Cli_primitive.path option;
|
|
servers : Melange_edn_melange.any Rrbvec.t;
|
|
raw : Melange_edn_melange.any option;
|
|
}
|
|
|
|
type report = { status : check_status; checks : check Rrbvec.t }
|
|
|
|
val check_db_worker_script : action -> check
|
|
val check_root_dir : Cli_config.t -> check
|
|
val check_running_servers : Cli_config.t -> check Cli_effect.t
|
|
|
|
include Command_spec.S with type parsed := parsed and type action := action
|