summaryrefslogtreecommitdiff
path: root/libguile/objcodes.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-06-16 20:01:56 +0200
committerAndy Wingo <wingo@pobox.com>2011-06-16 20:01:56 +0200
commit99cc1092a89292c6e6db2db537988e5963b19868 (patch)
tree94f69d35c6328c2ab83304d8996a2dd957cac529 /libguile/objcodes.c
parent46da7909e1f67c13284730344e971d293df890c0 (diff)
parent32f94bf258bd032fa6f96fc76e4153086bc001f5 (diff)
downloadguile-99cc1092a89292c6e6db2db537988e5963b19868.tar.gz
Merge remote-tracking branch 'local-2.0/stable-2.0'
Diffstat (limited to 'libguile/objcodes.c')
-rw-r--r--libguile/objcodes.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/objcodes.c b/libguile/objcodes.c
index 74f551efb..a4657befb 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;