Ocaml <-> C++ binding
[tatoo.git] / src / bindings / c++ / tatoo.h
1 #ifndef TATOO_H
2 #define TATOO_H
3 #pragma once
4
5 #include <caml/mlvalues.h>
6
7 extern "C" {
8
9 CAMLprim value node_getFirstChild(value node);
10 CAMLprim value node_getNextSibling(value node);
11 CAMLprim value node_getNodeType(value node);
12 CAMLprim value node_getNodeName(value node);
13 CAMLprim value node_getPreorder(value node);
14
15 CAMLprim value nodelist_getLength(value list);
16 CAMLprim value nodelist_item(value list, value idx);
17 CAMLprim value nodelist_new(value unit);
18 CAMLprim value nodelist_add(value list, value node);
19
20 CAMLprim value getNull(value unit);
21 CAMLprim value dereference_object(value obj);
22 }
23
24 #endif