From a634fd7c6e4859f4d3ff595a31eaf04b18a82a5f Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Sat, 18 Jul 2015 22:14:37 -0400
Subject: [PATCH] Handle include directory

---
 cyclone.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/cyclone.scm b/cyclone.scm
index fd7421ad..eccc17a4 100644
--- a/cyclone.scm
+++ b/cyclone.scm
@@ -19,8 +19,10 @@
 (cond-expand
  (chicken
    (define (Cyc-installation-dir . opt) 
-     ;; Ignore opt and always assume current dir for chicken, since it is just dev
-     "/home/justin/Documents/cyclone")
+     (if (equal? '(inc) opt)
+       "/home/justin/Documents/cyclone/include"
+       ;; Ignore opt and always assume current dir for chicken, since it is just dev
+       "/home/justin/Documents/cyclone"))
    (require-extension extras) ;; pretty-print
    (require-extension chicken-syntax) ;; when
    (require-extension srfi-1) ;; every