aboutsummaryrefslogtreecommitdiffstats
path: root/csc.csc
diff options
context:
space:
mode:
authorRose Hogenson <rhogenson@posteo.net>2022-08-01 19:37:49 -0700
committerRose Hogenson <rhogenson@posteo.net>2022-08-01 19:37:49 -0700
commit25750ee505bd976d3c606200fec7253ad40c46d9 (patch)
tree5984514f625db2f7fa01256adef4d3c7be2e3615 /csc.csc
parentModify the project structure. (diff)
downloadchromatopelma-25750ee505bd976d3c606200fec7253ad40c46d9.tar.zst
Remove mutable globals.
Per a closer reading of R7RS, it's an error to mutate an imported binding with set!. My apologies to Guile when I said they had a bug.
Diffstat (limited to 'csc.csc')
-rw-r--r--csc.csc4
1 files changed, 2 insertions, 2 deletions
diff --git a/csc.csc b/csc.csc
index 9dae75f..c338aa7 100644
--- a/csc.csc
+++ b/csc.csc
@@ -4,7 +4,7 @@
(only (scheme read)
read)
(only (csc compiler)
- *library-search-dirs*
+ add-library-search-dirs
compile)
(only (csc flag)
*args*
@@ -69,7 +69,7 @@
((file) file)
(_ (printf "Error: must pass exactly one file to csc.\n{}" *help-msg*)
(exit 2))))
- (set! *library-search-dirs* *include*)
+ (add-library-search-dirs *include*)
(write-file *output* (compile (read-file input-file))))