val memory_delete : string -> unit
(** Delete the [key]. If the key doesn't exist, has no effect. *)
+val memory_list : unit -> (string * string) list
+ (** Return all [(key, value)] pairs in the memory. *)
+
(** {2 Publishing goals} *)
val publish : string -> (string list -> unit) -> unit