aboutsummaryrefslogtreecommitdiffstats
path: root/backend/IRC.ml
diff options
context:
space:
mode:
authorDavid Monniaux <David.Monniaux@univ-grenoble-alpes.fr>2021-09-24 14:51:15 +0200
committerDavid Monniaux <David.Monniaux@univ-grenoble-alpes.fr>2021-09-24 14:51:15 +0200
commite49318b3606d7568d8592887e4278efa696afd10 (patch)
tree99a9a1b883e1db3a4f56e1b5046453817827ceef /backend/IRC.ml
parent2789e6179af061381f5b18a268adb562b28bcb8e (diff)
parentc34d25e011402aedad62b3fe9b7b04989df4522e (diff)
downloadcompcert-kvx-e49318b3606d7568d8592887e4278efa696afd10.tar.gz
compcert-kvx-e49318b3606d7568d8592887e4278efa696afd10.zip
Merge branch 'master' of https://github.com/AbsInt/CompCert into towards_3.10
Diffstat (limited to 'backend/IRC.ml')
-rw-r--r--backend/IRC.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/backend/IRC.ml b/backend/IRC.ml
index 29d224c8..d9e4651e 100644
--- a/backend/IRC.ml
+++ b/backend/IRC.ml
@@ -34,8 +34,8 @@ type node =
{ ident: int; (*r unique identifier *)
typ: typ; (*r its type *)
var: var; (*r the XTL variable it comes from *)
- mutable regclass: int; (*r identifier of register class *)
- mutable accesses: int; (*r number of defs and uses *)
+ regclass: int; (*r identifier of register class *)
+ accesses: int; (*r number of defs and uses *)
mutable spillcost: float; (*r estimated cost of spilling *)
mutable adjlist: node list; (*r all nodes it interferes with *)
mutable degree: int; (*r number of adjacent nodes *)
@@ -207,7 +207,7 @@ type graph = {
varTable: (var, node) Hashtbl.t;
mutable nextIdent: int;
(* The adjacency set *)
- mutable adjSet: unit IntPairs.t;
+ adjSet: unit IntPairs.t;
(* Low-degree, non-move-related nodes *)
simplifyWorklist: DLinkNode.t;
(* Low-degree, move-related nodes *)