val parse :
?context:string ->
( 'a, string ) Core_kernel.Result.t ->
( 'a, t ) Async_kernel.Deferred.Result.t
val sql :
?context:string ->
( 'a, [< Caqti_error.t ] ) Async_kernel.Deferred.Result.t ->
( 'a, t ) Async_kernel.Deferred.Result.t
val wrap :
( 'a, t ) Async_kernel.Deferred.Result.t ->
( 'a, [> `App of t ] ) Async_kernel.Deferred.Result.t