aboutsummaryrefslogtreecommitdiff
path: root/plugins
diff options
context:
space:
mode:
authorEnrico Tassi2019-02-11 10:56:55 +0100
committerEnrico Tassi2019-02-11 10:57:11 +0100
commit3aaf1d2d07bcbc11f97ab42838418d01c389aeec (patch)
tree5528327c23386301a012374da0420f7375c4ea94 /plugins
parentaa66e4b3e58699db5af904e14247c73744398732 (diff)
[ssr] keep user annotation on views (fix #9538)
Diffstat (limited to 'plugins')
-rw-r--r--plugins/ssr/ssrparser.mlg6
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 *)