strip accidentally added duplicate nqp_spawn op

Raku · Oct 29, 2013 · 6ac28c2 · 6ac28c2
1 parent aca76d0
commit 6ac28c2
Showing 1 changed file with 0 additions and 14 deletions.
diff --git a/src/vm/parrot/ops/nqp.ops b/src/vm/parrot/ops/nqp.ops
@@ -3704,20 +3704,6 @@ inline op nqp_getlexrelcaller(out PMC, in PMC, in STR) :base_core {
     $1 = result;
 }
 
-inline op nqp_spawn(out INT, in PMC, in STR, in PMC) {
-    STRING *dir            = $3;
-    PMC *env               = $4;
-    char *const *argv      = pack_arg_array(interp, $2);
-    char *args             = create_command_line(argv);
-    STRING *command        = Parrot_str_new(interp, args, 0);
-    STRING * const old_cwd = Parrot_file_getcwd(interp);
-    Parrot_str_free_cstring(args);
-
-    Parrot_file_chdir(interp, dir);
-    $1 = Run_OS_Command(interp, command, env);
-    Parrot_file_chdir(interp, old_cwd);
-}
-
 inline op nqp_delete_f(out INT, in STR) :base_core {
 #ifdef WIN32
     char* const filename = Parrot_str_to_platform_cstring(interp, $2);