26 lines
424 B
OCaml
26 lines
424 B
OCaml
(* Capstone Disassembler Engine
|
|
* By Nguyen Anh Quynh <aquynh@gmail.com>, 2013> *)
|
|
|
|
open Mips_const
|
|
|
|
(* architecture specific info of instruction *)
|
|
type mips_op_mem = {
|
|
base: int;
|
|
displ: int
|
|
}
|
|
|
|
type mips_op_value =
|
|
| MIPS_OP_INVALID of int
|
|
| MIPS_OP_REG of int
|
|
| MIPS_OP_IMM of int
|
|
| MIPS_OP_MEM of mips_op_mem
|
|
|
|
type mips_op = {
|
|
value: mips_op_value;
|
|
}
|
|
|
|
type cs_mips = {
|
|
op_count: int;
|
|
operands: mips_op array;
|
|
}
|