> ---
>  library.scm | 2 +-
>  1 file changed, 1 insertion(+), 1 deletion(-)
>
> diff --git a/library.scm b/library.scm
> index 064b7d9c..640d1c56 100644
> --- a/library.scm
> +++ b/library.scm
> @@ -4348,7 +4348,7 @@ EOF
>    (lambda (x)
>      (##sys#check-closure x 'procedure-information)
>      (and-let* ((info (##sys#lambda-info x)))
> -      (##sys#read (open-input-string (##sys#lambda-info->string info)) #f) ) 
> ) )
> +      (##sys#read (scheme#open-input-string (##sys#lambda-info->string 
> info)) #f) ) ) )
>

Thanks! Pushed.


felix


Reply via email to