diff options
| author |  bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-07 08:44:10 +0000 |
|---|---|---|
| committer | bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-07 08:44:10 +0000 |
| commit | 509940521cda3057455adb0f0af8b16d88b73df6 (patch) | |
| tree | b8875c516657477e58ced22caf84533834081ed0 /contrib | |
| parent | 2ec0991f0fef6b529a0d90d64f06aff1c8db91ab (diff) | |
Make sure the parser knows about the constructors of type nat, so
that specific syntax for this type can be parsed and translated to tree
structures.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1555 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/interface/xlate.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/contrib/interface/xlate.ml b/contrib/interface/xlate.ml index 85e750b20..326079633 100644 --- a/contrib/interface/xlate.ml +++ b/contrib/interface/xlate.ml @@ -39,6 +39,9 @@ Hashtbl.add type_table "Coq.Init.Logic.and" Hashtbl.add type_table "Coq.Init.Datatypes.prod" [|[|"dummy";"pair"|]|];; +Hashtbl.add type_table "Coq.Init.Datatypes.nat" + [|[|"";"O"; "S"|]|];; + Hashtbl.add type_table "Coq.Zarith.fast_integer.Z" [|[|"";"ZERO";"POS";"NEG"|]|];; |