X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_parser%2FgrafiteParser.ml;h=8f37c918e83e8834446ddc667cb835dfc95bb04f;hb=1c950d8cfe400f6b68eee7a67c555549db3a4d36;hp=b20ca85baa3c0e48fb7e04d2c0055590a610e510;hpb=4b6193be548c96964beee706b75a06e269eed88d;p=helm.git

diff --git a/helm/software/components/grafite_parser/grafiteParser.ml b/helm/software/components/grafite_parser/grafiteParser.ml
index b20ca85ba..8f37c918e 100644
--- a/helm/software/components/grafite_parser/grafiteParser.ml
+++ b/helm/software/components/grafite_parser/grafiteParser.ml
@@ -189,6 +189,7 @@ EXTEND
     | IDENT "nelim"; what = tactic_term ; where = pattern_spec ->
         GrafiteAst.NElim (loc, what, where)
     | SYMBOL "#"; n=IDENT -> GrafiteAst.NIntro (loc,n)
+    | SYMBOL "#"; SYMBOL "_" -> GrafiteAst.NIntro (loc,"_")
     | SYMBOL "*" -> GrafiteAst.NCase1 (loc,"_")
     | SYMBOL "*"; n=IDENT ->
         GrafiteAst.NCase1 (loc,n)