From 07177cf17149b49232efe58b5189defbcb63f5d7 Mon Sep 17 00:00:00 2001
From: xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>
Date: Wed, 14 Jul 2010 09:21:58 +0000
Subject: Fix extraction problem

git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1418 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
---
 powerpc/Machregsaux.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'powerpc/Machregsaux.ml')

diff --git a/powerpc/Machregsaux.ml b/powerpc/Machregsaux.ml
index 2ff3cd9..87800be 100644
--- a/powerpc/Machregsaux.ml
+++ b/powerpc/Machregsaux.ml
@@ -46,6 +46,6 @@ let register_by_name s =
     None
 
 let can_reserve_register r =
-  List.mem r Conventions.int_callee_save_regs
-  || List.mem r Conventions.float_callee_save_regs
+  List.mem r Conventions1.int_callee_save_regs
+  || List.mem r Conventions1.float_callee_save_regs
 
-- 
cgit v1.2.3