From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 26 Jan 2019 23:21:33 +0000 (-0800)
Subject: Change param:reader-fold-case? to be settable.
X-Git-Tag: mit-scheme-pucked-10.1.10~6^2~23
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=cd38101be3c58a4b4361e5715375fc87a9eff4dd;p=mit-scheme.git

Change param:reader-fold-case? to be settable.
---

diff --git a/src/runtime/reader.scm b/src/runtime/reader.scm
index 584594554..c76b8b1dd 100644
--- a/src/runtime/reader.scm
+++ b/src/runtime/reader.scm
@@ -40,7 +40,7 @@ USA.
   (make-unsettable-parameter #f boolean-converter))
 
 (define-deferred param:reader-fold-case?
-  (make-unsettable-parameter #t boolean-converter))
+  (make-settable-parameter #t boolean-converter))
 
 (define-deferred param:reader-enable-attributes?
   (make-unsettable-parameter #t boolean-converter))