; persist/api — the public entry point. persist/open returns a backend (the
; in-memory one by default; pass a custom backend to inject file/pg/ipfs-ref).
; All facet functions take this backend as their first argument.
; Requires: lib/persist/backend.sx, lib/persist/log.sx, lib/persist/kv.sx.

(define
  persist/open
  (fn
    (&rest args)
    (if (= (len args) 0) (persist/mem-backend) (first args))))