Commit acb84611 authored by MARCHE Claude's avatar MARCHE Claude

Coq identifiers black list

parent ac1738ba
......@@ -28,8 +28,9 @@ open Term
open Decl
open Printer
let black_list = [ "at"; "cofix"; "exists2"; "fix"; "IF"; "mod"; "Prop";
"return"; "Set"; "Type"; "using"; "where"]
let black_list =
[ "at"; "cofix"; "exists2"; "fix"; "IF"; "left"; "mod"; "Prop";
"return"; "right"; "Set"; "Type"; "using"; "where"; ]
let iprinter =
let isanitize = sanitizer char_to_alpha char_to_alnumus in
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment