From 924b0943d203efe811683ae00e61f53481787c3a Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 14 May 2015 14:28:49 -0400
Subject: [PATCH] Test case for (include)

---
 examples/hello-library/libs/lib1.scm | 1 +
 examples/hello-library/libs/lib1.sld | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)
 create mode 100644 examples/hello-library/libs/lib1.scm

diff --git a/examples/hello-library/libs/lib1.scm b/examples/hello-library/libs/lib1.scm
new file mode 100644
index 00000000..a2b79b5a
--- /dev/null
+++ b/examples/hello-library/libs/lib1.scm
@@ -0,0 +1 @@
+(define lib1-test "test of include from a library")
diff --git a/examples/hello-library/libs/lib1.sld b/examples/hello-library/libs/lib1.sld
index 9da42ce9..22f3ede4 100644
--- a/examples/hello-library/libs/lib1.sld
+++ b/examples/hello-library/libs/lib1.sld
@@ -5,7 +5,8 @@
 ;;; A sample library
 ;;;
 (define-library (libs lib1)
-    (export lib1-hello)
+    (export lib1-hello lib1-test)
+    (include "lib1.scm")
     (import ;(scheme base)
             ;(scheme write)
             (libs lib2))