1 files changed, 27 insertions, 0 deletions
diff --git a/capstone/bindings/ocaml/systemz.ml b/capstone/bindings/ocaml/systemz.ml
new file mode 100644
index 000000000..755bf5d79
--- /dev/null
+++ b/capstone/bindings/ocaml/systemz.ml
@@ -0,0 +1,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;
+}