X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Flexicon%2FlexiconAst.ml;h=9fb188d486bfd15cdbd177af975c47e67e4892ff;hb=68a2f8d0a8c34cb7ea0438c7db9222a853a38826;hp=50f0061eebb0e894b9a1173dda6538348df14c5e;hpb=b95be966e385957a25f26a41f45e0116955264ae;p=helm.git

diff --git a/helm/software/components/lexicon/lexiconAst.ml b/helm/software/components/lexicon/lexiconAst.ml
index 50f0061ee..9fb188d48 100644
--- a/helm/software/components/lexicon/lexiconAst.ml
+++ b/helm/software/components/lexicon/lexiconAst.ml
@@ -41,7 +41,7 @@ let magic = 5
 type inclusion_mode = WithPreferences | WithoutPreferences (* aka aliases *)
 
 type command =
-  | Include of loc * string * inclusion_mode
+  | Include of loc * string * inclusion_mode * string (* _,buri,_,path *)
   | Alias of loc * alias_spec
       (** parameters, name, type, fields *) 
   | Notation of loc * direction option * CicNotationPt.term * Gramext.g_assoc *