From 32f94bf258bd032fa6f96fc76e4153086bc001f5 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Thu, 16 Jun 2011 18:27:57 +0200 Subject: O_CLOEXEC usage * libguile/objcodes.c (scm_load_objcode): * libguile/scmsigs.c (start_signal_delivery_thread): * libguile/threads.c (guilify_self_1): Use O_CLOEXEC. --- libguile/objcodes.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libguile/objcodes.c') diff --git a/libguile/objcodes.c b/libguile/objcodes.c index c45ca8585..526751acc 100644 --- a/libguile/objcodes.c +++ b/libguile/objcodes.c @@ -295,7 +295,7 @@ SCM_DEFINE (scm_load_objcode, "load-objcode", 1, 0, 0, SCM_VALIDATE_STRING (1, file); c_file = scm_to_locale_string (file); - fd = open (c_file, O_RDONLY); + fd = open (c_file, O_RDONLY | O_CLOEXEC); free (c_file); if (fd < 0) SCM_SYSERROR; -- cgit v1.2.3