R (topkg.Topkg_result.R)

val reword_error : ('b -> 'c) -> ('a, 'b) r -> ('a, 'c) r

type msg = [

]

val msgf : ('a, Stdlib.Format.formatter, unit, [> msg ]) Stdlib.format4 -> 'a

val error_msg : string -> ('b, [> msg ]) r

val error_msgf : 
  ('a, Stdlib.Format.formatter, unit, ('b, [> msg ]) r) Stdlib.format4 ->
  'a

val reword_error_msg : 
  ?replace:bool ->
  (string -> msg) ->
  ('a, msg) r ->
  ('a, [> msg ]) r