projects
/
mes.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
342195b
)
Revert "fork/exec: debug."
author
Jan Nieuwenhuizen
<janneke@gnu.org>
Fri, 25 May 2018 09:21:26 +0000
(11:21 +0200)
committer
Jan Nieuwenhuizen
<janneke@gnu.org>
Fri, 25 May 2018 09:21:26 +0000
(11:21 +0200)
This reverts commit
f0315ac0d9acd66a30dbb192334f443459b7ed16
.
src/posix.c
patch
|
blob
|
history
diff --git
a/src/posix.c
b/src/posix.c
index 267f4d83ec07587d9c3a2b0a096446752e4e9a5b..332c5807d4a7617dadc32e33d652ac1e7de6f975 100644
(file)
--- a/
src/posix.c
+++ b/
src/posix.c
@@
-272,7
+272,6
@@
execl_ (SCM file_name, SCM args) ///((name . "execl"))
{
char *c_argv[100];
int i = 0;
- eputs ("core:execl file_name="); write_error_ (file_name); eputs ("\n");
int n = 0;
c_argv[i++] = string_to_cstring_ (file_name, string_to_cstring_buf+n);
n += length__ (STRING (file_name)) + 1;
@@
-285,11
+284,6
@@
execl_ (SCM file_name, SCM args) ///((name . "execl"))
args = CDR (args);
}
c_argv[i] = 0;
- i = 0;
- while (c_argv[i])
- {
- eputs (" argv["); eputs (itoa (i)); eputs ("]: "); eputs (c_argv[i++]); eputs ("\n");
- }
return MAKE_NUMBER (execve (c_argv[0], c_argv, g_environment));
}