diff options
author | blazy <blazy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-01-08 07:53:02 +0000 |
---|---|---|
committer | blazy <blazy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-01-08 07:53:02 +0000 |
commit | a8c744000247af207b489d3cdd4e3d3cf60f72e1 (patch) | |
tree | 96c7ee4e244fccdb840233007604ba52d97c09e0 /backend/IRC_graph.v | |
parent | 283afabc594b385e4f17fa59647aa8cddee27f85 (diff) | |
download | compcert-a8c744000247af207b489d3cdd4e3d3cf60f72e1.tar.gz compcert-a8c744000247af207b489d3cdd4e3d3cf60f72e1.zip |
ajout branche allocation de registres
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1220 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/IRC_graph.v')
-rwxr-xr-x | backend/IRC_graph.v | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/backend/IRC_graph.v b/backend/IRC_graph.v new file mode 100755 index 00000000..31e9ce80 --- /dev/null +++ b/backend/IRC_graph.v @@ -0,0 +1,15 @@ +Require Import FSets. +Require Import InterfGraphMapImp. + +Record irc_graph := Make_IRC_Graph { +irc_g : tt; +irc_wl : WS; +pal : VertexSet.t; +irc_k : nat; +HWS_irc : WS_properties irc_g irc_k irc_wl; +Hk : VertexSet.cardinal pal = irc_k +}. + +Definition graph_to_IRC_graph g palette := +let K := VertexSet.cardinal palette in +Make_IRC_Graph g (get_WL g K) palette K (WS_prop_get _ _) (refl_equal _). |