aboutsummaryrefslogtreecommitdiffstats
path: root/scheduling/RTLpathWFcheck.v
diff options
context:
space:
mode:
authorLéo Gourdin <leo.gourdin@univ-grenoble-alpes.fr>2021-02-23 18:13:28 +0100
committerLéo Gourdin <leo.gourdin@univ-grenoble-alpes.fr>2021-02-23 18:13:28 +0100
commita78fe0efa4b114d7c5ae11d0bed8cd17d55fd89c (patch)
treec8a59f14c27caf63241c507e7a7ff023c55c4c8a /scheduling/RTLpathWFcheck.v
parent3ce99d1f53b24704b45b6984d0fd0bc156016309 (diff)
parent91699fd379eb4087eb4088af77a5eb918552dc5e (diff)
downloadcompcert-kvx-a78fe0efa4b114d7c5ae11d0bed8cd17d55fd89c.tar.gz
compcert-kvx-a78fe0efa4b114d7c5ae11d0bed8cd17d55fd89c.zip
Merge remote-tracking branch 'origin/riscv-work-rules' into riscv-work
Diffstat (limited to 'scheduling/RTLpathWFcheck.v')
-rw-r--r--scheduling/RTLpathWFcheck.v3
1 files changed, 1 insertions, 2 deletions
diff --git a/scheduling/RTLpathWFcheck.v b/scheduling/RTLpathWFcheck.v
index 0ddc3142..63b914ec 100644
--- a/scheduling/RTLpathWFcheck.v
+++ b/scheduling/RTLpathWFcheck.v
@@ -31,14 +31,13 @@ Proof.
inversion_SOME path; try_simplify_someHyps.
Qed.
-(* FIXME - what about trap? *)
Definition iinst_checker (pm: path_map) (i: instruction): option (node) :=
match i with
| Inop pc' | Iop _ _ _ pc' | Iload _ _ _ _ _ pc'
| Istore _ _ _ _ pc' => Some (pc')
| Icond cond args ifso ifnot _ =>
exit_checker pm ifso ifnot
- | _ => None (* TODO jumptable ? *)
+ | _ => None
end.
Local Hint Resolve exit_checker_path_entry: core.