let
stmt v =
match
stmt_opt v
with
None
->
raise
Not_found
|
Some
s
->
s