summaryrefslogtreecommitdiff
path: root/libguile/posix.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/posix.c')
-rw-r--r--libguile/posix.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/libguile/posix.c b/libguile/posix.c
index 67aeb87df..c763f4da8 100644
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -811,7 +811,7 @@ scm_uname ()
SCM ans = scm_make_vector(SCM_MAKINUM(5), SCM_UNSPECIFIED, SCM_BOOL_F);
SCM *ve = SCM_VELTS (ans);
SCM_DEFER_INTS;
- if (uname (&buf))
+ if (uname (&buf) < 0)
scm_syserror (s_uname);
ve[0] = scm_makfrom0str (buf.sysname);
ve[1] = scm_makfrom0str (buf.nodename);
@@ -921,9 +921,7 @@ scm_open_pipe (pipestr, modes)
modes = scm_makfromstr (SCM_ROCHARS (modes), SCM_ROLENGTH (modes), 0);
SCM_NEWCELL (z);
SCM_DEFER_INTS;
- scm_ignore_signals ();
SCM_SYSCALL (f = popen (SCM_ROCHARS (pipestr), SCM_ROCHARS (modes)));
- scm_unignore_signals ();
if (!f)
scm_syserror (s_open_pipe);
pt = scm_add_to_port_table (z);