Translate.UtilsPrint error and exit on error. Mimic Core.Command.basic_or_error.
val command_unit_of_basic :
(Base.unit -> Base.unit) Cmdlang.Command.t ->
Base.unit Cmdlang.Command.tval command_unit_of_or_error :
(Base.unit -> Base.unit Base.Or_error.t) Cmdlang.Command.t ->
Base.unit Cmdlang.Command.t