aboutsummaryrefslogtreecommitdiff
path: root/lib/option.ml
diff options
context:
space:
mode:
authorMatej Kosik2015-12-16 12:54:58 +0100
committerMatej Kosik2015-12-18 15:57:43 +0100
commitca42472322013714050b98756aeaa222908fbe67 (patch)
tree1808913ef48a8e45a2b8e01b799f51265c1d39e8 /lib/option.ml
parent98065338c54717fd2d7aa887e8693acdc1cff5ba (diff)
COMMENTS: updated in the "Option" module.
Diffstat (limited to 'lib/option.ml')
-rw-r--r--lib/option.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/option.ml b/lib/option.ml
index 9ea1a76982..2f6e8365bb 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