Re: [MIT-Scheme-devel] Fixes pushed

[craven]

> Fixed both bugs.

One more, make check now fails on one test:

;Run tests "runtime/test-dynamic-env"...
;  Generating "test-dynamic-env.bin" because of: "test-dynamic-env.scm"
;  Generating SCode for file: "test-dynamic-env.scm" => 
"test-dynamic-env.bin"... done
;  Generating "test-dynamic-env.com" because of: "test-dynamic-env.bin"
;  Compiling file: "test-dynamic-env.bin" => "test-dynamic-env.com"... done
;parameters passed 1 sub-tests in 0. seconds
;complicated-dynamic-parameter failed 1 sub-tests out of 1 in 0. seconds:
     failed with error: The procedure #[compiled-closure 64 (lambda "dynamic" 
#xb) #x478 #xfbd3f0 #x3d0b910] has been called with 1 argument; it requires 
exactly 0 arguments.
;... done

It seems `make-parameter' generates unsettable parameters, so the
following patch might help:

diff --git a/tests/runtime/test-dynamic-env.scm 
b/tests/runtime/test-dynamic-env.scm
index 581231b..e67fcd6 100644
--- a/tests/runtime/test-dynamic-env.scm
+++ b/tests/runtime/test-dynamic-env.scm
@@ -46,7 +46,7 @@ USA.
 
 ;; From node "Dynamic Binding" in doc/ref-manual/special-forms.texi:
 (define (complicated-dynamic-parameter)
-  (let ((variable (make-parameter 1))
+  (let ((variable (make-settable-parameter 1))
         (inside-continuation))
     (write-line (variable))
     (call-with-current-continuation

Greetings,
Peter