diff options
| author | Cyril Cohen | 2019-02-11 22:40:37 +0100 |
|---|---|---|
| committer | Cyril Cohen | 2019-02-11 22:40:37 +0100 |
| commit | 218db2670903159c9a1e28da7b5caf3d08c59689 (patch) | |
| tree | 94e88ce1e143b5872e4d83f9910106d650e38749 /plugins | |
| parent | 0a18d769c88372eca162cf7a2f2eec61165c1f77 (diff) | |
| parent | 3aaf1d2d07bcbc11f97ab42838418d01c389aeec (diff) | |
Merge PR #9540: [ssr] keep user annotation on views (fix #9538)
Reviewed-by: CohenCyril
Fixes a bug introduced by PR #9341
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/ssr/ssrparser.mlg | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/plugins/ssr/ssrparser.mlg b/plugins/ssr/ssrparser.mlg index 3fb21e5ef6..2a2cd73df2 100644 --- a/plugins/ssr/ssrparser.mlg +++ b/plugins/ssr/ssrparser.mlg @@ -591,10 +591,8 @@ END GRAMMAR EXTEND Gram GLOBAL: ssrfwdview; ssrfwdview: [ - [ test_not_ssrslashnum; "/"; c = Pcoq.Constr.constr -> - { [mk_ast_closure_term `None c] } - | test_not_ssrslashnum; "/"; c = Pcoq.Constr.constr; w = ssrfwdview -> - { (mk_ast_closure_term `None c) :: w } ]]; + [ test_not_ssrslashnum; "/"; c = ast_closure_term -> { [c] } + | test_not_ssrslashnum; "/"; c = ast_closure_term; w = ssrfwdview -> { c :: w } ]]; END (* ipats *) |