diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2014-12-04 15:39:28 +0100 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2014-12-04 15:39:28 +0100 |
| commit | 52b22c39bfb257add757c5efe26d28052a77964e (patch) | |
| tree | 41350880d1f2a068b8f434331be2d4705d18061a /checklink/Check.ml | |
| parent | 5735f427bb0e6698eb946b961baadfed0fac31e5 (diff) | |
| parent | 00a5e1af73862b1b1aa29b5a07fe43f80f29c764 (diff) | |
| download | compcert-52b22c39bfb257add757c5efe26d28052a77964e.tar.gz compcert-52b22c39bfb257add757c5efe26d28052a77964e.zip | |
Merge branch 'master' into dwarf
Diffstat (limited to 'checklink/Check.ml')
| -rw-r--r-- | checklink/Check.ml | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/checklink/Check.ml b/checklink/Check.ml index 0876f881..c99a4db4 100644 --- a/checklink/Check.ml +++ b/checklink/Check.ml @@ -536,11 +536,6 @@ let check_label_existence ffw = *) let rec match_jmptbl lbllist vaddr size ffw = let atom = Hashtbl.find ffw.sf.atoms ffw.this_ident in - let jmptbl_section = - match atom.a_sections with - | [_; _; j] -> j - | _ -> Section_jumptable - in let rec match_jmptbl_aux lbllist bs ffw = match lbllist with | [] -> OK ffw |