X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matitaB%2Fcomponents%2Fcontent%2FnotationPt.ml;h=b624c9a8639c6e46a9ba2fef120cbdb6af3d11c8;hb=6b71759b5897c5ba4e76d93561e52ee555f269bf;hp=2c94ec356edb50493a46cb8f5e17cbb8b2bb8012;hpb=00bf2ea3ead13657205e37b0f16d084ba0732523;p=helm.git diff --git a/matitaB/components/content/notationPt.ml b/matitaB/components/content/notationPt.ml index 2c94ec356..b624c9a86 100644 --- a/matitaB/components/content/notationPt.ml +++ b/matitaB/components/content/notationPt.ml @@ -51,9 +51,9 @@ type term_attribute = ] type literal = - [ `Symbol of string - | `Keyword of string - | `Number of string + [ `Symbol of string * (string option * string option) + | `Keyword of string * (string option * string option) + | `Number of string * (string option * string option) ] type case_indtype = string * href option