diff options
author | Guillaume Melquiond <guillaume.melquiond@inria.fr> | 2015-02-23 11:26:51 +0100 |
---|---|---|
committer | Guillaume Melquiond <guillaume.melquiond@inria.fr> | 2015-02-23 13:37:52 +0100 |
commit | df2f50db3703b4f7f88f00ac382c7f3f1efaceb3 (patch) | |
tree | c11084a17eec2bc25bdcbba715aa1ba50b108272 /tactics/dnet.ml | |
parent | 705bf896bfc552e95403d097fe9b8031c598d88b (diff) |
Fix some typos in comments.
Diffstat (limited to 'tactics/dnet.ml')
-rw-r--r-- | tactics/dnet.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tactics/dnet.ml b/tactics/dnet.ml index 61a358662..bb71620c0 100644 --- a/tactics/dnet.ml +++ b/tactics/dnet.ml @@ -121,7 +121,7 @@ struct Idset.union acc s2 ) t Idset.empty) -(* (\* optimization hack: Not_found is catched in fold_pattern *\) *) +(* (\* optimization hack: Not_found is caught in fold_pattern *\) *) (* let fast_inter s1 s2 = *) (* if Idset.is_empty s1 || Idset.is_empty s2 then raise Not_found *) (* else Idset.inter s1 s2 *) @@ -176,7 +176,7 @@ struct let is_empty : t -> bool = function | None -> false | Some s -> S.is_empty s - (* optimization hack: Not_found is catched in fold_pattern *) + (* optimization hack: Not_found is caught in fold_pattern *) let fast_inter s1 s2 = if is_empty s1 || is_empty s2 then raise Not_found else let r = inter s1 s2 in |