projects
/
SXSI
/
xpathcomp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Use attribute force_align_arg_pointer only for architectures where it
[SXSI/xpathcomp.git]
/
src
/
xml-tree-builder_stub.cpp
diff --git
a/src/xml-tree-builder_stub.cpp
b/src/xml-tree-builder_stub.cpp
index
6fc1c60
..
89442da
100644
(file)
--- a/
src/xml-tree-builder_stub.cpp
+++ b/
src/xml-tree-builder_stub.cpp
@@
-8,7
+8,7
@@
static xml_tree_builder*& OBJ_VAL(value v)
return Obj_val<xml_tree_builder*>(v);
}
return Obj_val<xml_tree_builder*>(v);
}
-
extern "C"
value caml_xml_tree_builder_create(value unit)
+
ML_BINDING
value caml_xml_tree_builder_create(value unit)
{
CAMLparam1(unit);
CAMLlocal1(result);
{
CAMLparam1(unit);
CAMLlocal1(result);
@@
-18,7
+18,7
@@
extern "C" value caml_xml_tree_builder_create(value unit)
CAMLreturn(result);
}
CAMLreturn(result);
}
-
extern "C"
value caml_xml_tree_builder_open_document(value vbuilder,
+
ML_BINDING
value caml_xml_tree_builder_open_document(value vbuilder,
value vsrate,
value vdtc,
value vidxtype)
value vsrate,
value vdtc,
value vidxtype)
@@
-47,7
+47,9
@@
extern "C" value caml_xml_tree_builder_open_document(value vbuilder,
CAMLreturn (Val_unit);
}
CAMLreturn (Val_unit);
}
-extern "C" value caml_xml_tree_builder_close_document(value vbuilder)
+
+ML_BINDING value caml_xml_tree_builder_close_document(value vbuilder)
+
{
CAMLparam1(vbuilder);
CAMLlocal1(result);
{
CAMLparam1(vbuilder);
CAMLlocal1(result);
@@
-59,7
+61,7
@@
extern "C" value caml_xml_tree_builder_close_document(value vbuilder)
CAMLreturn (result);
}
CAMLreturn (result);
}
-
extern "C"
value caml_xml_tree_builder_open_tag(value vbuilder, value vtag)
+
ML_BINDING
value caml_xml_tree_builder_open_tag(value vbuilder, value vtag)
{
CAMLparam2(vbuilder, vtag);
const char * tag = String_val(vtag);
{
CAMLparam2(vbuilder, vtag);
const char * tag = String_val(vtag);
@@
-67,7
+69,7
@@
extern "C" value caml_xml_tree_builder_open_tag(value vbuilder, value vtag)
CAMLreturn (Val_unit);
}
CAMLreturn (Val_unit);
}
-
extern "C"
value caml_xml_tree_builder_close_tag(value vbuilder, value vtag)
+
ML_BINDING
value caml_xml_tree_builder_close_tag(value vbuilder, value vtag)
{
CAMLparam2(vbuilder, vtag);
const char * tag = String_val(vtag);
{
CAMLparam2(vbuilder, vtag);
const char * tag = String_val(vtag);
@@
-75,7
+77,7
@@
extern "C" value caml_xml_tree_builder_close_tag(value vbuilder, value vtag)
CAMLreturn (Val_unit);
}
CAMLreturn (Val_unit);
}
-
extern "C"
value caml_xml_tree_builder_text(value vbuilder, value vtext)
+
ML_BINDING
value caml_xml_tree_builder_text(value vbuilder, value vtext)
{
CAMLparam2(vbuilder, vtext);
const char * text = String_val(vtext);
{
CAMLparam2(vbuilder, vtext);
const char * text = String_val(vtext);