From 10db8b9a2bb3157c2f849d2194e11376daabdda1 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Mon, 19 May 2014 13:39:28 +0900
Subject: [PATCH] let embedding files be configurable

---
 etc/mkloader.pl    | 13 +++----------
 src/CMakeLists.txt |  3 ++-
 2 files changed, 5 insertions(+), 11 deletions(-)

diff --git a/etc/mkloader.pl b/etc/mkloader.pl
index 1f397915..565c392b 100755
--- a/etc/mkloader.pl
+++ b/etc/mkloader.pl
@@ -2,20 +2,13 @@
 
 use strict;
 
-my @files = (
-    'piclib/built-in.scm',
-    'piclib/srfi/1.scm',
-    'piclib/srfi/26.scm',
-    'piclib/srfi/95.scm'
-    );
-
 print <<EOL;
 #include "picrin.h"
 #include "picrin/error.h"
 
 EOL
 
-foreach my $file (@files) {
+foreach my $file (@ARGV) {
     my $var = &escape_v($file);
     print "const char *$var =\n";
 
@@ -37,7 +30,7 @@ pic_load_piclib(pic_state *pic)
   pic_try {
 EOL
 
-foreach my $file (@files) {
+foreach my $file (@ARGV) {
     my $var = &escape_v($file);
     print "    pic_load_cstr(pic, $var);\n";
 }
@@ -60,6 +53,6 @@ EOL
 sub escape_v {
     ($_) = @_;
     s/\.scm$//g;
-    s/[\/-]/_/g;
+    s/[^[A-Za-z0-9_]/_/g;
     $_;
 }
diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 008543ca..c628cebe 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -8,10 +8,11 @@ set(XFILE_SOURCES extlib/xfile/xfile.c)
 
 # piclib
 find_package(Perl REQUIRED)
+file(GLOB_RECURSE PICLIB_SCHEME_LIBS ${PROJECT_SOURCE_DIR}/piclib/*.scm)
 set(PICLIB_SOURCES ${PROJECT_SOURCE_DIR}/src/load_piclib.c)
 add_custom_command(
   OUTPUT ${PICLIB_SOURCES}
-  COMMAND ${PERL_EXECUTABLE} etc/mkloader.pl > ${PROJECT_SOURCE_DIR}/src/load_piclib.c
+  COMMAND ${PERL_EXECUTABLE} etc/mkloader.pl ${PICLIBS} > ${PROJECT_SOURCE_DIR}/src/load_piclib.c
   WORKING_DIRECTORY ${PROJECT_SOURCE_DIR}
   )