diff options
| author |  bgregoir <bgregoir@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2007-06-20 09:43:36 +0000 |
|---|---|---|
| committer | bgregoir <bgregoir@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2007-06-20 09:43:36 +0000 |
| commit | f4586d1e8b1116340574d9660117f93e7a1e4e3b (patch) | |
| tree | 15b7dff4ed22b762446e4ae1f426e8f8aa2de52c /kernel/retroknowledge.ml | |
| parent | 4708506ca1b34e93835b163db102f6860c89190c (diff) | |
ajout de head0 et tail0 en natif
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9900 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/retroknowledge.ml')
| -rw-r--r-- | kernel/retroknowledge.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/kernel/retroknowledge.ml b/kernel/retroknowledge.ml index f064cd8b9..b82556c78 100644 --- a/kernel/retroknowledge.ml +++ b/kernel/retroknowledge.ml @@ -58,11 +58,13 @@ type int31_field = | Int31Div | Int31AddMulDiv | Int31Compare + | Int31Head0 + | Int31Tail0 type field = - | KEq + (* | KEq | KNat of nat_field - | KN of n_field + | KN of n_field *) | KInt31 of string*int31_field |