aboutsummaryrefslogtreecommitdiffstats
path: root/backend
diff options
context:
space:
mode:
Diffstat (limited to 'backend')
-rw-r--r--backend/IRC.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/backend/IRC.ml b/backend/IRC.ml
index 43955897..b359da35 100644
--- a/backend/IRC.ml
+++ b/backend/IRC.ml
@@ -240,7 +240,8 @@ type graph = {
let class_of_type = function
| Tint | Tlong -> 0
| Tfloat | Tsingle -> 1
- | Tany32 | Tany64 -> assert false
+ | Tany32 -> 0
+ | Tany64 -> if Archi.ptr64 then 0 else 1
let class_of_reg r =
if Conventions1.is_float_reg r then 1 else 0