diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-02-12 22:56:43 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-02-12 22:56:43 +0000 |
| commit | 33c0d04c1ae40fb3eded886f8d82eb941e588fc9 (patch) | |
| tree | 2b3863afcfca8ccb73db473c889320f2ec24ac33 /checker/term.ml | |
| parent | 351c92f5c61082e9e8f5e1c9364f1836416f17d3 (diff) | |
Checker: re-sync vo structures after Maxime's commit 16136
make validate still fails, but that's another issue (#2949) we're
still working on...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16198 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'checker/term.ml')
| -rw-r--r-- | checker/term.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/checker/term.ml b/checker/term.ml index e7e9c891b..8e968904b 100644 --- a/checker/term.ml +++ b/checker/term.ml @@ -80,8 +80,8 @@ let val_fix f = [|val_tuple~name:"fix2"[|val_array val_int;val_int|];val_prec f|] let val_cofix f = val_tuple ~name:"pcofixpoint"[|val_int;val_prec f|] -type cast_kind = VMcast | DEFAULTcast -let val_cast = val_enum "cast_kind" 2 +type cast_kind = VMcast | NATIVEcast | DEFAULTcast +let val_cast = val_enum "cast_kind" 3 (*s*******************************************************************) (* The type of constructions *) |