diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2018-04-12 11:10:28 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2018-04-12 11:10:28 +0200 |
| commit | 32b424902383a99436439a3c8ee24a528d1077a9 (patch) | |
| tree | dcf2c6e9e732d153f28e446e5ea748fa529329be /lib/loc.mli | |
| parent | 8059a0efa79fcd72d56c424adf1bea10dae28d6d (diff) | |
| parent | df5c63872c2630d79b23c128ac47a62de3e9c322 (diff) | |
Merge PR #7107: Fixes #7100: lost of main file location in case of Ltac failure in other file
Diffstat (limited to 'lib/loc.mli')
| -rw-r--r-- | lib/loc.mli | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/loc.mli b/lib/loc.mli index 813c45fbb..23df1ebd9 100644 --- a/lib/loc.mli +++ b/lib/loc.mli @@ -42,6 +42,10 @@ val merge : t -> t -> t val merge_opt : t option -> t option -> t option (** Merge locations, usually generating the largest possible span *) +val finer : t option -> t option -> bool +(** Answers [true] when the first location is more defined, or, when + both defined, included in the second one *) + val shift_loc : int -> int -> t -> t (** [shift_loc loc n p] shifts the beginning of location by [n] and the end by [p]; it is assumed that the shifts do not change the |