diff options
| author | letouzey | 2001-10-22 16:19:42 +0000 |
|---|---|---|
| committer | letouzey | 2001-10-22 16:19:42 +0000 |
| commit | a5b3d9a4486c176d76926d824f2386988d3edd7b (patch) | |
| tree | bc19e09ee576fa77af9d1e64e2124cc1298fee21 /contrib/extraction/test | |
| parent | 115a337d250da743c136dfed77b03c69109f2517 (diff) | |
chambardement important des fichiers auxiliaires. Nouvelle syntaxe pour les options
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2133 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/extraction/test')
| -rw-r--r-- | contrib/extraction/test/addReals | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/extraction/test/addReals b/contrib/extraction/test/addReals index 86e9a79947..601592091a 100644 --- a/contrib/extraction/test/addReals +++ b/contrib/extraction/test/addReals @@ -22,4 +22,4 @@ let rec int_to_Z i = else Fast_integer.NEG (int_to_positive (-i)) -let my_ceil x = int_to_Z (int_of_float (ceil x)) +let my_ceil x = int_to_Z (succ (int_of_float (floor x))) |