From b39791601bb128c37db82eb66a8bc1991047818f Mon Sep 17 00:00:00 2001 From: xleroy Date: Tue, 14 Jun 2011 11:55:11 +0000 Subject: Coloringaux: better cost estimate for annotation builtins Regression: more tests for annotations git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1675 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- backend/Coloringaux.ml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'backend') diff --git a/backend/Coloringaux.ml b/backend/Coloringaux.ml index 02081d5..34fab90 100644 --- a/backend/Coloringaux.ml +++ b/backend/Coloringaux.ml @@ -817,6 +817,8 @@ let spill_costs f = charge_ros 10 ros; charge_list 1 args; charge 1 res | Itailcall(sg, ros, args) -> charge_ros 10 ros; charge_list 1 args + | Ibuiltin(EF_annot _, args, res, _) -> () (* not actually used *) + | Ibuiltin(EF_annot_val _, args, res, _) -> charge_list 1 args; charge 1 res | Ibuiltin(ef, args, res, _) -> charge_list 10 args; charge 10 res | Icond(cond, args, _, _) -> charge_list 10 args | Ijumptable(arg, _) -> charge 10 arg -- cgit v1.2.3