diff options
author | Andy Wingo <wingo@pobox.com> | 2011-06-16 20:01:56 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-06-16 20:01:56 +0200 |
commit | 99cc1092a89292c6e6db2db537988e5963b19868 (patch) | |
tree | 94f69d35c6328c2ab83304d8996a2dd957cac529 /libguile/objcodes.c | |
parent | 46da7909e1f67c13284730344e971d293df890c0 (diff) | |
parent | 32f94bf258bd032fa6f96fc76e4153086bc001f5 (diff) | |
download | guile-99cc1092a89292c6e6db2db537988e5963b19868.tar.gz |
Merge remote-tracking branch 'local-2.0/stable-2.0'
Diffstat (limited to 'libguile/objcodes.c')
-rw-r--r-- | libguile/objcodes.c | 2 |
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; |