X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=samples%2Fembed%2Ftest-invoke.c;fp=samples%2Fembed%2Ftest-invoke.c;h=9d53716957513a48a04ade4b7fee8df99e8db224;hb=a457e88362c25b0ab5ed417a846dd1a4e7ca2433;hp=8779ce3860ea11b97b944677820db462c8252664;hpb=2d3d9334972ea7b6588dd8d0c763abc7e40c4197;p=mono.git diff --git a/samples/embed/test-invoke.c b/samples/embed/test-invoke.c index 8779ce3860e..9d537169575 100644 --- a/samples/embed/test-invoke.c +++ b/samples/embed/test-invoke.c @@ -5,7 +5,10 @@ #include #include #include -#include + +#ifndef FALSE +#define FALSE 0 +#endif /* * Simple mono embedding example. @@ -76,7 +79,7 @@ access_reference_field (MonoObject *obj) p = mono_string_to_utf8 (strval); printf ("Value of str is: %s\n", p); /* we need to free the result from mono_string_to_utf8 () */ - g_free (p); + mono_free (p); /* string are immutable, so we need to create a different string */ strval = mono_string_new (domain, "hello from the embedding API"); @@ -99,8 +102,8 @@ call_methods (MonoObject *obj) MonoObject *result, *exception; MonoString *str; char *p; - gpointer iter; - gpointer args [2]; + void* iter; + void* args [2]; int val; klass = mono_object_get_class (obj); @@ -164,7 +167,7 @@ call_methods (MonoObject *obj) p = mono_string_to_utf8 (str); printf ("Value of str from property is: %s\n", p); /* we need to free the result from mono_string_to_utf8 () */ - g_free (p); + mono_free (p); /* Now we'll show two things: * 1) static methods are invoked with mono_runtime_invoke () as well, @@ -205,7 +208,7 @@ call_methods (MonoObject *obj) p = mono_string_to_utf8 (str); printf ("Values of str/val from Values () are: %s/%d\n", p, val); /* we need to free the result from mono_string_to_utf8 () */ - g_free (p); + mono_free (p); } static void @@ -241,7 +244,7 @@ more_methods (MonoDomain *domain) p = mono_string_to_utf8 (str); printf ("25.ToString (): %s\n", p); /* we need to free the result from mono_string_to_utf8 () */ - g_free (p); + mono_free (p); /* Now: see how the result is different if we search for the ToString () * method in System.Object: mono_runtime_invoke () doesn't do any sort of @@ -255,7 +258,7 @@ more_methods (MonoDomain *domain) p = mono_string_to_utf8 (str); printf ("25.ToString (), from System.Object: %s\n", p); /* we need to free the result from mono_string_to_utf8 () */ - g_free (p); + mono_free (p); /* Now get the method that overrides ToString () in obj */ vtmethod = mono_object_get_virtual_method (obj, method);