summaryrefslogtreecommitdiff
path: root/libguile/objcodes.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-04-01 11:23:12 +0200
committerAndy Wingo <wingo@pobox.com>2011-04-01 11:23:12 +0200
commit355dd8cb4bff2821f4b4da2bd989441b882ed5de (patch)
tree34d33efc1562b54168b9e3a8811a39273e5faa63 /libguile/objcodes.c
parentd050ef66eceb764e0c26e535140ebed795b546fa (diff)
downloadguile-355dd8cb4bff2821f4b4da2bd989441b882ed5de.tar.gz
make_objcode_by_mmap uses MAP_PRIVATE, not MAP_SHARED
* libguile/objcodes.c (make_objcode_by_mmap): MAP_PRIVATE, not MAP_SHARED -- we don't need to update the underlying file, nor do we need to see updates.
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 f4e20f8f2..e91e265da 100644
--- a/libguile/objcodes.c
+++ b/libguile/objcodes.c
@@ -70,7 +70,7 @@ make_objcode_by_mmap (int fd)
scm_misc_error (FUNC_NAME, "object file too small (~a bytes)",
scm_list_1 (SCM_I_MAKINUM (st.st_size)));
- addr = mmap (0, st.st_size, PROT_READ, MAP_SHARED, fd, 0);
+ addr = mmap (0, st.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
if (addr == MAP_FAILED)
{
(void) close (fd);