diff options
| author | Maxime Dénès | 2018-03-07 11:09:35 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2018-03-07 11:09:35 +0100 |
| commit | 5a2e1b95411376206f23046991e1ae5e8a259f01 (patch) | |
| tree | 91da1aa086f63a0fa5318af282cc77b6d979a0f3 /interp | |
| parent | 719a10381a7738f82ef5d6abc3d19accf99ad4f0 (diff) | |
| parent | 65701510e61651c91d4c256c04499cc3cf38794c (diff) | |
Merge PR #6905: Fix make ml-doc
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/constrintern.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/constrintern.ml b/interp/constrintern.ml index 84162ca89b..918e12e5cb 100644 --- a/interp/constrintern.ml +++ b/interp/constrintern.ml @@ -1077,7 +1077,7 @@ type 'a raw_cases_pattern_expr_r = | RCPatAlias of 'a raw_cases_pattern_expr * Misctypes.lname | RCPatCstr of Globnames.global_reference * 'a raw_cases_pattern_expr list * 'a raw_cases_pattern_expr list - (** [RCPatCstr (loc, c, l1, l2)] represents ((@c l1) l2) *) + (** [RCPatCstr (loc, c, l1, l2)] represents [((@ c l1) l2)] *) | RCPatAtom of (Misctypes.lident * (Notation_term.tmp_scope_name option * Notation_term.scope_name list)) option | RCPatOr of 'a raw_cases_pattern_expr list and 'a raw_cases_pattern_expr = ('a raw_cases_pattern_expr_r, 'a) DAst.t |