12 lines
438 B
Diff
12 lines
438 B
Diff
--- src/build/build0.scm.orig
|
|
+++ src/build/build0.scm
|
|
@@ -9,7 +9,7 @@
|
|
(define (compile modf)
|
|
(displayln "... compile " modf)
|
|
(let ((proc (open-process
|
|
- (list path: "gsc"
|
|
+ (list path: (getenv "GERBIL_GSC" "gsc")
|
|
arguments: (list "-cc-options" "--param max-gcse-memory=300000000" modf)
|
|
stdout-redirection: #f))))
|
|
(if (not (zero? (process-status proc)))
|