~ chicken-core (chicken-5) a488b134a818fce7bcd6db24d862440a69d467fc

commit a488b134a818fce7bcd6db24d862440a69d467fc
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Oct 28 21:40:35 2016 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Oct 28 21:40:35 2016 +0200

    need access to csi name too

diff --git a/egg-environment.scm b/egg-environment.scm
index 0fa691f5..c69bdad1 100644
--- a/egg-environment.scm
+++ b/egg-environment.scm
@@ -41,6 +41,9 @@ EOF
 (define default-csc 
   (string-append default-bindir "/" (foreign-value "C_CSC_PROGRAM" c-string)))
 
+(define default-csi 
+  (string-append default-bindir "/" (foreign-value "C_CSI_PROGRAM" c-string)))
+
 (define default-builder 
   (make-pathname default-bindir (foreign-value "C_CHICKEN_DO_PROGRAM" c-string)))