summaryrefslogtreecommitdiff
path: root/otherlibs/unix/execv.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/execv.c')
-rw-r--r--otherlibs/unix/execv.c32
1 files changed, 0 insertions, 32 deletions
diff --git a/otherlibs/unix/execv.c b/otherlibs/unix/execv.c
deleted file mode 100644
index b7cd800986..0000000000
--- a/otherlibs/unix/execv.c
+++ /dev/null
@@ -1,32 +0,0 @@
-/***********************************************************************/
-/* */
-/* Objective Caml */
-/* */
-/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */
-/* */
-/* Copyright 1996 Institut National de Recherche en Informatique et */
-/* en Automatique. All rights reserved. This file is distributed */
-/* under the terms of the GNU Library General Public License, with */
-/* the special exception on linking described in file ../../LICENSE. */
-/* */
-/***********************************************************************/
-
-/* $Id$ */
-
-#include <mlvalues.h>
-#include <memory.h>
-#include "unixsupport.h"
-
-extern char ** cstringvect();
-
-CAMLprim value unix_execv(value path, value args)
-{
- char ** argv;
- argv = cstringvect(args);
- (void) execv(String_val(path), argv);
- stat_free((char *) argv);
- uerror("execv", path);
- return Val_unit; /* never reached, but suppress warnings */
- /* from smart compilers */
-}
-