From c3003517a048d7469a314fc245118ed72e2158dd Mon Sep 17 00:00:00 2001 From: Cyril SIX Date: Mon, 29 Apr 2019 18:02:58 +0200 Subject: The scheduler selection works, but the argument is not optional yet (-fpostpass nameofscheduler) --- mppa_k1c/PostpassSchedulingOracle.ml | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'mppa_k1c/PostpassSchedulingOracle.ml') diff --git a/mppa_k1c/PostpassSchedulingOracle.ml b/mppa_k1c/PostpassSchedulingOracle.ml index bd804fd6..25bf99e0 100644 --- a/mppa_k1c/PostpassSchedulingOracle.ml +++ b/mppa_k1c/PostpassSchedulingOracle.ml @@ -756,11 +756,17 @@ let print_bb oc bb = let do_schedule bb = let problem = build_problem bb + in let solution = (if !Clflags.option_fpostpass_sched = "ilp" then + validated_scheduler cascaded_scheduler + else if !Clflags.option_fpostpass_sched = "list" then + validated_scheduler list_scheduler + else if !Clflags.option_fpostpass_sched = "dumb" then + dumb_scheduler else failwith "No scheduler provided") problem (* in let solution = validated_scheduler (if !Clflags.option_fpostpass_ilp then cascaded_scheduler else dumb_scheduler) problem *) - in let solution = dumb_scheduler problem + (* in let solution = dumb_scheduler problem *) in match solution with | None -> failwith "Could not find a valid schedule" | Some sol -> let bundles = bundlize_solution bb sol in -- cgit