diff options
| author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2009-12-16 14:10:06 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2009-12-16 14:10:06 +0000 |
| commit | 1cd87015f2f1711a2e63719ab3229dc013a30b68 (patch) | |
| tree | 3b076c865326d34e411f9eb24600e84f71a2ab60 /backend/RTLgenaux.ml | |
| parent | 8d40eb315976d05fe9d1d60b654b5523c8830a67 (diff) | |
| download | compcert-1cd87015f2f1711a2e63719ab3229dc013a30b68.tar.gz compcert-1cd87015f2f1711a2e63719ab3229dc013a30b68.zip | |
MAJ extraction after changes in Integers
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1200 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/RTLgenaux.ml')
| -rw-r--r-- | backend/RTLgenaux.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/RTLgenaux.ml b/backend/RTLgenaux.ml index 7e42c80d..1f457f3e 100644 --- a/backend/RTLgenaux.ml +++ b/backend/RTLgenaux.ml @@ -18,7 +18,7 @@ let more_likely (c: condexpr) (ifso: stmt) (ifnot: stmt) = false module IntOrd = struct - type t = Integers.int + type t = Integers.Int.int let compare x y = if Integers.Int.eq x y then 0 else if Integers.Int.ltu x y then -1 else 1 |