From: Javier Sancho <jsf@jsancho.org>
Date: Fri, 9 Sep 2016 17:27:21 +0000 (+0200)
Subject: Root file for the module
X-Git-Url: https://git.jsancho.org/?a=commitdiff_plain;h=c9d851ff82c14f676e0b9a652ff66eb5225191ba;p=gacela.git

Root file for the module
---

diff --git a/gacela.scm b/gacela.scm
index ea649e2..5b31c64 100644
--- a/gacela.scm
+++ b/gacela.scm
@@ -16,3 +16,17 @@
 
 
 (define-module (gacela))
+
+;;; Based on Sly code. Thank you so much!!
+
+(eval-when (eval load compile)
+  (begin
+    (define %public-modules
+      '((gacela image)
+	(gacela math)
+	(gacela scene)))
+
+    (for-each (let ((i (module-public-interface (current-module))))
+		(lambda (m)
+		  (module-use! i (resolve-interface m))))
+	      %public-modules)))