From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Wed, 1 Apr 2009 20:53:04 +0000 (+0000)
Subject: ## prefix is now used for tinycals
X-Git-Tag: make_still_working~4127
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=9c2f282765ec75a3c9aafc9e73e6626588891abe;p=helm.git

## prefix is now used for tinycals

Example:  napply H; ##[ #H | #K];
---

diff --git a/helm/software/components/grafite_parser/grafiteParser.ml b/helm/software/components/grafite_parser/grafiteParser.ml
index 821d2909a..b3bbaf3f8 100644
--- a/helm/software/components/grafite_parser/grafiteParser.ml
+++ b/helm/software/components/grafite_parser/grafiteParser.ml
@@ -749,6 +749,8 @@ EXTEND
     | punct = punctuation_tactical -> GrafiteAst.Tactic (loc, None, punct)
     | tac = ntactic; punct = punctuation_tactical ->
         GrafiteAst.NTactic (loc, tac, punct)
+    | SYMBOL "#" ; SYMBOL "#" ; punct = punctuation_tactical ->
+        GrafiteAst.NTactic (loc, GrafiteAst.NId loc, punct)
     | tac = non_punctuation_tactical; punct = punctuation_tactical ->
         GrafiteAst.NonPunctuationTactical (loc, tac, punct)
     | mac = macro; SYMBOL "." -> GrafiteAst.Macro (loc, mac)