X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fbindings%2Fjava%2Ftatoo.h;fp=src%2Fbindings%2Fjava%2Ftatoo.h;h=f343ca6547b531eeb2c7ac8a86d4b54029db8668;hp=0000000000000000000000000000000000000000;hb=33cc91c072d0c3ee3f17911f6484a24f55a3408b;hpb=a089738aa464521c0ae79944eb00fc147cc37ac9

diff --git a/src/bindings/java/tatoo.h b/src/bindings/java/tatoo.h
new file mode 100644
index 0000000..f343ca6
--- /dev/null
+++ b/src/bindings/java/tatoo.h
@@ -0,0 +1,27 @@
+#ifndef TATOO_H
+#define TATOO_H
+#pragma once
+
+#include <caml/mlvalues.h>
+
+extern "C" {
+
+CAMLprim value node_getFirstChild(value node);
+CAMLprim value node_getNextSibling(value node);
+CAMLprim value node_getKind(value node);
+CAMLprim value node_getNodeName(value node);
+CAMLprim value node_getPreorder(value node);
+CAMLprim value node_getAttributes(value node);
+
+CAMLprim value nodelist_getLength(value list);
+CAMLprim value nodelist_item(value list, value idx);
+CAMLprim value nodelist_new(value list);
+CAMLprim value nodelist_add(value list, value node);
+
+CAMLprim value namednodemap_getLength(value list);
+CAMLprim value namednodemap_item(value list, value idx);
+
+CAMLprim value getNull(value unit);
+}
+
+#endif