open ELF_parsers
open ELF_types
open PPC_printers
open PPC_utils
letdisassemble elf sym_name =letsym=List.find
(funsym->sym.st_name = sym_name)(Array.to_list elf.e_symtab)inmatch code_of_sym elf symwith| None ->"Couldn't find the code for that symbol name"| Some(ecode) ->
string_of_instr_list ecode