ut &quot;&quot; in
let r =
  try
    let _ = P.(parse input (fail &quot;hello error&quot;)) in
    assert false
  with
  | e -&gt; e
in
r
= P.Parser
    { offset = 0
    ; line_number = 0
    ; column_number = 0
    ; msg = &quot;hello error&quot;
    }</code></pre></div></div><div class="odoc-spec"><div class="spec value" id="val-bind" class="anchored"><a href="#val-bind" class="anchor"></a><code><span><span class="keyword">val</span> bind : <span><span>(<span><span class="type-var">'a</span> <span class="