diff options
Diffstat (limited to 'lib/option.ml')
| -rw-r--r-- | lib/option.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/option.ml b/lib/option.ml index 4ea613e4..fbb883d3 100644 --- a/lib/option.ml +++ b/lib/option.ml @@ -41,8 +41,8 @@ let hash f = function exception IsNone -(** [get x] returns [y] where [x] is [Some y]. It raises IsNone - if [x] equals [None]. *) +(** [get x] returns [y] where [x] is [Some y]. + @raise [IsNone] if [x] equals [None]. *) let get = function | Some y -> y | _ -> raise IsNone |