2007-11-10 Alp Toker <alp@atoker.com>

[mono.git] / samples / embed / teste.c

diff --git a/samples/embed/teste.c b/samples/embed/teste.c
index 4727c51a73604b6b07742f4f49320294c4c9c481..258d8aa5fa8d0dd5becdaff2842d4fe27fc9094b 100644 (file)
--- a/samples/embed/teste.c
+++ b/samples/embed/teste.c
@@ -1,10 +1,12 @@
 #include <mono/jit/jit.h>
+#include <mono/metadata/environment.h>
+#include <stdlib.h>
 
 /*
  * Very simple mono embedding example.
  * Compile with: 
- *     gcc -o teste teste.c `pkg-config --cflags --libs mono`
- *     mcs test.exe
+ *     gcc -o teste teste.c `pkg-config --cflags --libs mono` -lm
+ *     mcs test.cs
  * Run with:
  *     ./teste test.exe
  */
@@ -14,16 +16,40 @@ gimme () {
        return mono_string_new (mono_domain_get (), "All your monos are belong to us!");
 }
 
+static void main_function (MonoDomain *domain, const char *file, int argc, char** argv)
+{
+       MonoAssembly *assembly;
+
+       assembly = mono_domain_assembly_open (domain, file);
+       if (!assembly)
+               exit (2);
+       /*
+        * mono_jit_exec() will run the Main() method in the assembly.
+        * The return value needs to be looked up from
+        * System.Environment.ExitCode.
+        */
+       mono_jit_exec (domain, assembly, argc, argv);
+}
+
+
 int 
 main(int argc, char* argv[]) {
        MonoDomain *domain;
-       MonoAssembly *assembly;
        const char *file;
        int retval;
-
-       if (argc < 2)
+       
+       if (argc < 2){
+               fprintf (stderr, "Please provide an assembly to load\n");
                return 1;
+       }
        file = argv [1];
+
+       /*
+        * Load the default Mono configuration file, this is needed
+        * if you are planning on using the dllmaps defined on the
+        * system configuration
+        */
+       mono_config_parse (NULL);
        /*
         * mono_jit_init() creates a domain: each assembly is
         * loaded and run in a MonoDomain.
@@ -33,15 +59,12 @@ main(int argc, char* argv[]) {
         * We add our special internal call, so that C# code
         * can call us back.
         */
-       mono_add_internal_call ("Mono::gimme", gimme);
-       assembly = mono_domain_assembly_open (domain, file);
-       if (!assembly)
-               return 2;
-       /*
-        * mono_jit_exec() will run the Main() method in the assembly
-        * and return the value.
-        */
-       retval = mono_jit_exec (domain, assembly, argc - 1, argv + 1);
+       mono_add_internal_call ("MonoEmbed::gimme", gimme);
+
+       main_function (domain, file, argc - 1, argv + 1);
+       
+       retval = mono_environment_exitcode_get ();
+       
        mono_jit_cleanup (domain);
        return retval;
 }