aboutsummaryrefslogtreecommitdiffstats
path: root/capstone/bindings/ocaml/systemz.ml
blob: 755bf5d79b563e66a648bc596181af8676047c65 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
(* Capstone Disassembly Engine
 * By Guillaume Jeanne <guillaume.jeanne@ensimag.fr>, 2014> *)

open Sysz_const

type sysz_op_mem = {
	base: int;
	index: int;
	length: int64;
	disp: int64;
}

type sysz_op_value = 
	| SYSZ_OP_INVALID of int
	| SYSZ_OP_REG of int
	| SYSZ_OP_ACREG of int
	| SYSZ_OP_IMM of int
	| SYSZ_OP_MEM of sysz_op_mem

type sysz_op = {
	value: sysz_op_value;
}

type cs_sysz = { 
	cc: int;
	operands: sysz_op array;
}