xref: /aosp_15_r20/external/capstone/bindings/ocaml/systemz.ml (revision 9a0e4156d50a75a99ec4f1653a0e9602a5d45c18)
1*9a0e4156SSadaf Ebrahimi(* Capstone Disassembly Engine
2*9a0e4156SSadaf Ebrahimi * By Guillaume Jeanne <[email protected]>, 2014> *)
3*9a0e4156SSadaf Ebrahimi
4*9a0e4156SSadaf Ebrahimiopen Sysz_const
5*9a0e4156SSadaf Ebrahimi
6*9a0e4156SSadaf Ebrahimitype sysz_op_mem = {
7*9a0e4156SSadaf Ebrahimi	base: int;
8*9a0e4156SSadaf Ebrahimi	index: int;
9*9a0e4156SSadaf Ebrahimi	length: int64;
10*9a0e4156SSadaf Ebrahimi	disp: int64;
11*9a0e4156SSadaf Ebrahimi}
12*9a0e4156SSadaf Ebrahimi
13*9a0e4156SSadaf Ebrahimitype sysz_op_value =
14*9a0e4156SSadaf Ebrahimi	| SYSZ_OP_INVALID of int
15*9a0e4156SSadaf Ebrahimi	| SYSZ_OP_REG of int
16*9a0e4156SSadaf Ebrahimi	| SYSZ_OP_ACREG of int
17*9a0e4156SSadaf Ebrahimi	| SYSZ_OP_IMM of int
18*9a0e4156SSadaf Ebrahimi	| SYSZ_OP_MEM of sysz_op_mem
19*9a0e4156SSadaf Ebrahimi
20*9a0e4156SSadaf Ebrahimitype sysz_op = {
21*9a0e4156SSadaf Ebrahimi	value: sysz_op_value;
22*9a0e4156SSadaf Ebrahimi}
23*9a0e4156SSadaf Ebrahimi
24*9a0e4156SSadaf Ebrahimitype cs_sysz = {
25*9a0e4156SSadaf Ebrahimi	cc: int;
26*9a0e4156SSadaf Ebrahimi	operands: sysz_op array;
27*9a0e4156SSadaf Ebrahimi}
28