diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2007-03-02 15:43:35 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2007-03-02 15:43:35 +0000 |
commit | c98440cad6b7a9c793aded892ec61a8ed50cac28 (patch) | |
tree | a41e04cc10e91c3042ff5e114b89c1930ef8b93f /backend/Registers.v | |
parent | 28e7bce8f52e6675ae4a91e3d8fe7e5809e87073 (diff) | |
download | compcert-kvx-c98440cad6b7a9c793aded892ec61a8ed50cac28.tar.gz compcert-kvx-c98440cad6b7a9c793aded892ec61a8ed50cac28.zip |
Suppression de lib/Sets.v, utilisation de FSet a la place. Generalisation de Lattice pour utiliser une notion d'egalite possiblement differente de =. Adaptation de Kildall et de ses utilisateurs en consequence.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@182 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/Registers.v')
-rw-r--r-- | backend/Registers.v | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/backend/Registers.v b/backend/Registers.v index 5b1c7230..578e4b87 100644 --- a/backend/Registers.v +++ b/backend/Registers.v @@ -7,7 +7,9 @@ Require Import Coqlib. Require Import AST. Require Import Maps. -Require Import Sets. +Require Import Ordered. +Require Import FSets. +Require FSetAVL. Definition reg: Set := positive. @@ -45,4 +47,4 @@ Notation "a # b <- c" := (Regmap.set b c a) (at level 1, b at next level). (** Sets of registers *) -Module Regset := MakeSet(PTree). +Module Regset := FSetAVL.Make(OrderedPositive). |