Flexmasa.Test_api
Test APIs by hitting endpoints.
type display_policy = [
|
`All
|
`Lines of Internal_pervasives.int
|
`No
|
`On_error of display_policy
]
val call :
?comment:(Stdlib.Format.formatter -> Internal_pervasives.unit) ->
?expect:[< `Anything | `Status of Cohttp.Code.status_code Status ] ->
?show_body:display_policy ->
?show_response:display_policy ->
?how:[ `Get | `Post_json of Ezjsonm.t | `Delete_json of Ezjsonm.t ] ->
< console : Console.t.. > Internal_pervasives.Base_state.t ->
api_prefix:Internal_pervasives.string ->
path:Internal_pervasives.string ->
(< body_json :
(Ezjsonm.value, Internal_pervasives.string)
Flexmasa.Internal_pervasives.Result.t
; body_lines : Internal_pervasives.string Internal_pervasives.list >,
[> Internal_pervasives.System_error.t
| `Scenario_error of Internal_pervasives.string ])
Internal_pervasives.Asynchronous_result.t