Thanks, fixed. On Tue, Mar 1, 2016 at 10:34 AM, <cra...@gmx.net> wrote:
> > 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 >
_______________________________________________ MIT-Scheme-devel mailing list MIT-Scheme-devel@gnu.org https://lists.gnu.org/mailman/listinfo/mit-scheme-devel