diff options
| author | Hugo Herbelin | 2019-10-18 21:27:48 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2019-10-18 21:27:48 +0200 |
| commit | 54689c1c1e1333dd1bf63c619481c2ec99a5762e (patch) | |
| tree | 95798955f8638ad3f2067f7fd27426c31036124c /interp/notation.ml | |
| parent | c5f2b14020ea1fb2b11321f1daa00abe8dec3477 (diff) | |
| parent | a7b406bccfd51d7afee1f26ecfe38002be3b76f2 (diff) | |
Merge PR #10914: Fix Locate printing regression
Reviewed-by: herbelin
Diffstat (limited to 'interp/notation.ml')
| -rw-r--r-- | interp/notation.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/notation.ml b/interp/notation.ml index ea2173860d..70d3e4175e 100644 --- a/interp/notation.ml +++ b/interp/notation.ml @@ -1836,7 +1836,7 @@ let locate_notation prglob ntn scope = str "Notation" ++ fnl () ++ prlist_with_sep fnl (fun (ntn,l) -> let scope = find_default ntn scopes in - prlist + prlist_with_sep fnl (fun (sc,r,(_,df)) -> hov 0 ( pr_notation_info prglob df r ++ |