Added:

Type registration.  Correct support for casting.  Proper type safety.
Changed:
ocaml.swg: Correct casts, declaration order for C
ocamldec.swg: Removed problematic forward declarations without array index.


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@4573 626c5289-ae23-0410-ae9c-e8d60b6d4f22

SWIG/Examples/ocaml/shapes/example_prog.ml

@@ -38,7 +38,7 @@ let triangle_class pts ob meth args =
 let triangle =
   new_derived_object 
     new_shape
-    (triangle_class ((0.0,0.0),(0.5,1.0),(1.0,0.0)))
+    (triangle_class ((0.0,0.0),(0.5,1.0),(1.0,0.6)))
     C_void ;;
 
 let _ = _draw_shape_coverage (C_list [ triangle ; C_int 60 ; C_int 20 ]) ;;

SWIG/Examples/test-suite/ocaml/results

@@ -0,0 +1,208 @@
+Failed:
+bools.cpptest
+director_exception.cpptest
+lib_std_string.cpptest
+namespace_typemap.cpptest
+private_assign.cpptest
+template_type_namespace.cpptest
+template_typedef_import.multicpptest
+Success:
+abstract_inherit.cpptest
+abstract_inherit_ok.cpptest
+abstract_signature.cpptest
+abstract_typedef.cpptest
+abstract_typedef2.cpptest
+abstract_virtual.cpptest
+add_link.cpptest
+anonymous_arg.cpptest
+anonymous_bitfield.cpptest
+argout.cpptest
+arrayref.cpptest
+arrays_global.cpptest
+arrays_global_twodim.cpptest
+arrays_scope.cpptest
+bool_default.cpptest
+casts.cpptest
+cast_operator.cpptest
+class_ignore.cpptest
+const_const_2.cpptest
+constant_pointers.cpptest
+constover.cpptest
+constructor_exception.cpptest
+constructor_explicit.cpptest
+constructor_value.cpptest
+conversion.cpptest
+conversion_namespace.cpptest
+conversion_ns_template.cpptest
+cplusplus_throw.cpptest
+cpp_enum.cpptest
+cpp_enum_scope.cpptest
+cpp_namespace.cpptest
+cpp_nodefault.cpptest
+cpp_static.cpptest
+cpp_typedef.cpptest
+default_cast.cpptest
+default_constructor.cpptest
+default_ns.cpptest
+default_ref.cpptest
+director_basic.cpptest
+director_finalizer.cpptest
+director_unroll.cpptest
+dynamic_cast.cpptest
+enum_plus.cpptest
+enum_scope.cpptest
+enum_scope_template.cpptest
+enum_var.cpptest
+evil_diamond.cpptest
+evil_diamond_ns.cpptest
+evil_diamond_prop.cpptest
+explicit.cpptest
+extend_template.cpptest
+extend_template_ns.cpptest
+global_ns_arg.cpptest
+grouping.cpptest
+ignore_parameter.cpptest
+import_nomodule.cpptest
+inherit_missing.cpptest
+kind.cpptest
+lib_carrays.cpptest
+lib_cdata.cpptest
+lib_cpointer.cpptest
+lib_std_deque.cpptest
+lib_std_vector.cpptest
+lib_typemaps.cpptest
+long_long_apply.cpptest
+member_template.cpptest
+minherit.cpptest
+name_cxx.cpptest
+name_inherit.cpptest
+namespace_enum.cpptest
+namespace_extend.cpptest
+namespace_template.cpptest
+newobject1.cpptest
+overload_complicated.cpptest
+overload_copy.cpptest
+overload_extend.cpptest
+overload_simple.cpptest
+overload_subtype.cpptest
+overload_template.cpptest
+pointer_reference.cpptest
+primitive_ref.cpptest
+pure_virtual.cpptest
+reference_global_vars.cpptest
+rename_default.cpptest
+rename_scope.cpptest
+return_value_scope.cpptest
+rname.cpptest
+smart_pointer_const.cpptest
+smart_pointer_const2.cpptest
+smart_pointer_multi.cpptest
+smart_pointer_multi_typedef.cpptest
+smart_pointer_not.cpptest
+smart_pointer_overload.cpptest
+smart_pointer_protected.cpptest
+smart_pointer_rename.cpptest
+smart_pointer_simple.cpptest
+smart_pointer_typedef.cpptest
+static_array_member.cpptest
+static_const_member.cpptest
+static_const_member_2.cpptest
+struct_value.cpptest
+template.cpptest
+template_arg_replace.cpptest
+template_arg_scope.cpptest
+template_arg_typename.cpptest
+template_base_template.cpptest
+template_classes.cpptest
+template_const_ref.cpptest
+template_construct.cpptest
+template_default.cpptest
+template_default2.cpptest
+template_default_inherit.cpptest
+template_default_qualify.cpptest
+template_default_vw.cpptest
+template_enum.cpptest
+template_enum_ns_inherit.cpptest
+template_enum_typedef.cpptest
+template_explicit.cpptest
+template_extend1.cpptest
+template_extend2.cpptest
+template_forward.cpptest
+template_inherit.cpptest
+template_inherit_abstract.cpptest
+template_int_const.cpptest
+template_ns.cpptest
+template_ns2.cpptest
+template_ns3.cpptest
+template_ns4.cpptest
+template_ns_enum.cpptest
+template_ns_enum2.cpptest
+template_ns_inherit.cpptest
+template_ns_scope.cpptest
+template_qualifier.cpptest
+template_rename.cpptest
+template_retvalue.cpptest
+template_specialization.cpptest
+template_static.cpptest
+template_tbase_template.cpptest
+template_typedef.cpptest
+template_typedef_cplx.cpptest
+template_typedef_cplx2.cpptest
+template_typedef_cplx3.cpptest
+template_typedef_cplx4.cpptest
+template_virtual.cpptest
+template_whitespace.cpptest
+throw_exception.cpptest
+typedef_array_member.cpptest
+typedef_funcptr.cpptest
+typedef_inherit.cpptest
+typedef_mptr.cpptest
+typedef_reference.cpptest
+typedef_scope.cpptest
+typemap_namespace.cpptest
+typemap_ns_using.cpptest
+typename.cpptest
+union_scope.cpptest
+using1.cpptest
+using2.cpptest
+using_composition.cpptest
+using_extend.cpptest
+using_inherit.cpptest
+using_private.cpptest
+using_protected.cpptest
+valuewrapper_base.cpptest
+varargs.cpptest
+virtual_destructor.cpptest
+voidtest.cpptest
+arrayptr.ctest
+arrays.ctest
+char_constant.ctest
+const_const.ctest
+cpp_macro_noarg.ctest
+defineop.ctest
+defines.ctest
+enum.ctest
+function_typedef.ctest
+lib_carrays.ctest
+lib_cdata.ctest
+lib_cmalloc.ctest
+lib_constraints.ctest
+lib_cpointer.ctest
+lib_math.ctest
+long_long.ctest
+macro_2.ctest
+name.ctest
+nested.ctest
+newobject2.ctest
+overload_extendc.ctest
+preproc_1.ctest
+preproc_2.ctest
+preproc_3.ctest
+preproc_4.ctest
+preproc_5.ctest
+ret_by_value.ctest
+sizeof_pointer.ctest
+sneaky1.ctest
+typemap_subst.ctest
+unions.ctest
+imports.multicpptest