aboutsummaryrefslogtreecommitdiffstats
path: root/checklink/Disassembler.ml
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2015-10-20 14:45:56 +0200
committerBernhard Schommer <bernhardschommer@gmail.com>2015-10-20 14:45:56 +0200
commited6043fe910f7a320f7af6d3f9d35f39f5cf7ee1 (patch)
tree3fab134f5444f0472a1ff8c06e5b7686a40648dc /checklink/Disassembler.ml
parent4d542bc7eafadb16b845cf05d1eb4988eb55ed0f (diff)
parent8a95c3e07fd02eaa87f8cca447bc7d7c2642eb22 (diff)
downloadcompcert-ed6043fe910f7a320f7af6d3f9d35f39f5cf7ee1.tar.gz
compcert-ed6043fe910f7a320f7af6d3f9d35f39f5cf7ee1.zip
Merge remote-tracking branch 'origin/master' into named-externals
Conflicts: arm/TargetPrinter.ml backend/CMparser.mly backend/SelectLongproof.v backend/Selectionproof.v cfrontend/C2C.ml checklink/Asm_printers.ml checklink/Check.ml checklink/Fuzz.ml common/AST.v debug/DebugInformation.ml debug/DebugInit.ml debug/DwarfPrinter.ml debug/DwarfTypes.mli debug/Dwarfgen.ml exportclight/ExportClight.ml ia32/TargetPrinter.ml powerpc/Asm.v powerpc/SelectOpproof.v powerpc/TargetPrinter.ml
Diffstat (limited to 'checklink/Disassembler.ml')
-rw-r--r--checklink/Disassembler.ml15
1 files changed, 0 insertions, 15 deletions
diff --git a/checklink/Disassembler.ml b/checklink/Disassembler.ml
deleted file mode 100644
index 0e2c6883..00000000
--- a/checklink/Disassembler.ml
+++ /dev/null
@@ -1,15 +0,0 @@
-open ELF_parsers
-open ELF_types
-open PPC_printers
-open PPC_utils
-
-let disassemble elf sym_name =
- let sym =
- List.find
- (fun sym -> sym.st_name = sym_name)
- (Array.to_list elf.e_symtab)
- in
- match code_of_sym elf sym with
- | None -> "Couldn't find the code for that symbol name"
- | Some(ecode) ->
- string_of_instr_list ecode