From: Taylor R Campbell <campbell@mumble.net>
Date: Tue, 5 Apr 2011 00:52:36 +0000 (+0000)
Subject: Add comment about (not) dynamically scoping madvice.
X-Git-Tag: 20110426-Gtk~2^2~18
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=9fbe2ddc63b43bfc24ec5d2050f6e0fb7fa91d46;p=mit-scheme.git

Add comment about (not) dynamically scoping madvice.
---

diff --git a/src/microcode/gcloop.c b/src/microcode/gcloop.c
index 8c0a22fc6..845f3f882 100644
--- a/src/microcode/gcloop.c
+++ b/src/microcode/gcloop.c
@@ -394,6 +394,11 @@ gc_scan_oldspace (SCHEME_OBJECT * scan, SCHEME_OBJECT * end)
 {
   OS_expect_sequential_access (scan, end);
   run_gc_loop (scan, (&end));
+  /* FIXME: This doesn't actually revert the expectation for [scan,
+     end).  However, Unix has no way to query the madvice, or to
+     dynamically scope it, so this is the best we can do.  Fortunately,
+     at the moment, none of the system uses any special madvice, so it
+     doesn't matter for now.  */
   OS_expect_normal_access (scan, end);
 }