>From 61a7ecab5b6e62c9f085061ada9e505d1a00562c Mon Sep 17 00:00:00 2001
From: Christian Kellermann <address@hidden>
Date: Thu, 13 Oct 2011 21:57:22 +0200
Subject: [PATCH] Prefix include path correctly when CHICKEN_PREFIX is set.

This fixes bug #712 as reported by Sven Hartrumpf.
---
 csc.scm |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/csc.scm b/csc.scm
index ecf51a3..11bbff0 100644
--- a/csc.scm
+++ b/csc.scm
@@ -225,7 +225,8 @@
 (define translate-options '())
 
 (define include-dir
-  (let ((id (prefix "" "include" 
+  (let ((id (prefix ""
+                    (make-pathname "include" "chicken")
 		    (if host-mode INSTALL_INCLUDE_HOME TARGET_INCLUDE_HOME))))
     (and (not (member id '("/usr/include" "")))
 	 id) ) )
-- 
1.7.3.5