Add main function `acquire_asm` in Asm_acquire

This commit is contained in:
Théophile Bastian 2019-09-27 16:45:08 +02:00
parent 8038a92e89
commit 5c83f4e1b4
1 changed files with 6 additions and 0 deletions

View File

@ -272,3 +272,9 @@ let interpret_objdump objdump_out : asm_info_t =
(match result with
| ObjdumpAccu(result, _, None, []) -> result
| _ -> raise (ParseError "Invalid end state"))
(** Extract asm infos from an ELF file path *)
let acquire_asm elf_path =
get_objdump elf_path
|> interpret_objdump