Remove obsolete interpreter embedding sample.
authorZoltan Varga <vargaz@gmail.com>
Tue, 17 Nov 2015 07:16:25 +0000 (02:16 -0500)
committerZoltan Varga <vargaz@gmail.com>
Tue, 17 Nov 2015 07:16:25 +0000 (02:16 -0500)
samples/embed/testi.c [deleted file]

diff --git a/samples/embed/testi.c b/samples/embed/testi.c
deleted file mode 100644 (file)
index a1ea82b..0000000
+++ /dev/null
@@ -1,81 +0,0 @@
-#include <mono/interpreter/embed.h>
-#include <mono/metadata/environment.h>
-
-/*
- * Very simple mint embedding example.
- * Compile with: 
- *     gcc -o testi testi.c `pkg-config --cflags --libs mint` -lm
- *     mcs test.cs
- * Run with:
- *     ./testi test.exe
- */
-
-static MonoString*
-gimme () {
-       return mono_string_new (mono_domain_get (), "All your monos are belong to us!");
-}
-
-typedef struct
-{
-       MonoDomain *domain;
-       const char *file;
-       int argc;
-       char **argv;
-} MainThreadArgs;
-
-static void main_thread_handler (gpointer user_data)
-{
-       MainThreadArgs *main_args=(MainThreadArgs *)user_data;
-       MonoAssembly *assembly;
-
-       assembly = mono_domain_assembly_open (main_args->domain,
-                                             main_args->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_interp_exec (main_args->domain, assembly, main_args->argc,
-                      main_args->argv);
-}
-
-
-int 
-main(int argc, char* argv[]) {
-       MonoDomain *domain;
-       const char *file;
-       int retval;
-       MainThreadArgs main_args;
-       
-       if (argc < 2){
-               fprintf (stderr, "Please provide an assembly to load\n");
-               return 1;
-       }
-       file = argv [1];
-       /*
-        * mono_jit_init() creates a domain: each assembly is
-        * loaded and run in a MonoDomain.
-        */
-       domain = mono_interp_init (file);
-       /*
-        * We add our special internal call, so that C# code
-        * can call us back.
-        */
-       mono_add_internal_call ("MonoEmbed::gimme", gimme);
-
-       main_args.domain=domain;
-       main_args.file=file;
-       main_args.argc=argc-1;
-       main_args.argv=argv+1;
-       
-       mono_runtime_exec_managed_code (domain, main_thread_handler,
-                                       &main_args);
-
-       retval=mono_environment_exitcode_get ();
-       
-       mono_interp_cleanup (domain);
-       return retval;
-}
-