From 1cd87015f2f1711a2e63719ab3229dc013a30b68 Mon Sep 17 00:00:00 2001
From: xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>
Date: Wed, 16 Dec 2009 14:10:06 +0000
Subject: MAJ extraction after changes in Integers

git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1200 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
---
 backend/RTLgenaux.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'backend/RTLgenaux.ml')

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
-- 
cgit