]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/grafite_parser/grafiteParser.ml
- library/list/list.ma: unused code commented
[helm.git] / helm / software / components / grafite_parser / grafiteParser.ml
index 93cff174c4fb26e1c99334a761aef12e1b7aba14..3b84353310afb0f6b65fb97c87f56eb9ad892d52 100644 (file)
@@ -461,13 +461,14 @@ EXTEND
    [ params = LIST0 
       [ IDENT "prefix"; SYMBOL "="; prefix = QSTRING -> G.IPPrefix prefix  
       | flavour = inline_flavour -> G.IPAs flavour
+      | IDENT "coercions" -> G.IPCoercions
+      | IDENT "debug"; SYMBOL "="; debug = int -> G.IPDebug debug 
       | IDENT "procedural" -> G.IPProcedural
       | IDENT "nodefaults" -> G.IPNoDefaults
       | IDENT "depth"; SYMBOL "="; depth = int -> G.IPDepth depth 
       | IDENT "level"; SYMBOL "="; level = int -> G.IPLevel level 
       | IDENT "comments" -> G.IPComments
-      | IDENT "coercions" -> G.IPCoercions
-      | IDENT "debug"; SYMBOL "="; debug = int -> G.IPDebug debug 
+      | IDENT "cr" -> G.IPCR
       ] -> params
    ]
 ];