]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/DEVEL/lablgtk_gtkmathview/lablgtk-20000829_gtkmathview-0.2.0/minidom/ml_minidom.h
Binding completed and tested. Makefile still to do.
[helm.git] / helm / DEVEL / lablgtk_gtkmathview / lablgtk-20000829_gtkmathview-0.2.0 / minidom / ml_minidom.h
index c40060153b27110e4b2c735fc50327c1c288d86e..cf1be3a4a8c7921f6c39afbd8e79d88188cfc7dd 100644 (file)
@@ -5,6 +5,6 @@
 #define mDOMNode_val(v) ((mDOMNodeRef) v)
 
 #define mDOMNode_option_mDOMNodeRef(p) (((p) != NULL) ? ml_some((value) (p)) : Val_unit)
-#define mDOMNodeRef_mDOMNode_option(v) (((v) == Val_unit) ? NULL : Field((v),0))
-#define Val_mDOMNodeRef(p)             ((value) mDOMNode_option_mDOMNodeRef(p))
-#define mDOMNodeRef_val(v)             ((mDOMNodeRef) mDOMNodeRef_mDOMNode_option(v))
+#define mDOMNodeRef_mDOMNode_option(v) ((v == Val_unit) ? NULL : (mDOMNodeRef)Field((v),0))
+#define Val_mDOMNodeRef(p)             (mDOMNode_option_mDOMNodeRef(p))
+#define mDOMNodeRef_val(v)             (mDOMNodeRef_mDOMNode_option(v))