Merge branch 'master' of github.com:picrin-scheme/picrin

contrib/05.r7rs/CMakeLists.txt

@@ -0,0 +1,15 @@
+list(APPEND PICLIB_SCHEME_LIBS
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/base.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/cxr.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/read.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/write.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/file.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/case-lambda.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/lazy.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/eval.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/inexact.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/load.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/process-context.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/time.scm
+  ${PROJECT_SOURCE_DIR}/contrib/05.r7rs/scheme/r5rs.scm
+  )

contrib/10.srfi/CMakeLists.txt

@@ -0,0 +1,10 @@
+list(APPEND PICLIB_CONTRIB_LIBS
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/1.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/8.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/17.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/26.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/43.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/60.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/95.scm
+  ${PROJECT_SOURCE_DIR}/contrib/10.srfi/srfi/111.scm
+  )

contrib/20.repl/repl.scm

@@ -16,6 +16,23 @@
       (define (add-history str)
         #f))))
 
+  (eval
+   '(import (scheme base)
+            (scheme load)
+            (scheme process-context)
+            (scheme read)
+            (scheme write)
+            (scheme file)
+            (scheme inexact)
+            (scheme cxr)
+            (scheme lazy)
+            (scheme time)
+            (picrin macro)
+            (picrin dictionary)
+            (picrin array)
+            (picrin library))
+   '(picrin user))
+
   (define (repl)
     (let loop ((buf ""))
       (let ((line (readline (if (equal? buf "") "> " "* "))))

piclib/CMakeLists.txt

@@ -1,35 +1,10 @@
 list(APPEND PICLIB_SCHEME_LIBS
-  ${PROJECT_SOURCE_DIR}/piclib/picrin/macro.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/base.scm
+  ${PROJECT_SOURCE_DIR}/piclib/picrin/macro.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/record.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/array.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/dictionary.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/experimental/lambda.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/syntax-rules.scm
   ${PROJECT_SOURCE_DIR}/piclib/picrin/test.scm
-
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/base.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/cxr.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/read.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/write.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/file.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/case-lambda.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/lazy.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/eval.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/inexact.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/load.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/process-context.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/time.scm
-  ${PROJECT_SOURCE_DIR}/piclib/scheme/r5rs.scm
-
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/1.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/8.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/17.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/26.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/43.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/60.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/95.scm
-  ${PROJECT_SOURCE_DIR}/piclib/srfi/111.scm
-
-  ${PROJECT_SOURCE_DIR}/piclib/picrin/user.scm
   )

piclib/picrin/user.scm

@@ -1,17 +0,0 @@
-;  the default repl environment
-
-(define-library (picrin user)
-  (import (scheme base)
-          (scheme load)
-          (scheme process-context)
-          (scheme read)
-          (scheme write)
-          (scheme file)
-          (scheme inexact)
-          (scheme cxr)
-          (scheme lazy)
-          (scheme time)
-          (picrin macro)
-          (picrin dictionary)
-          (picrin array)
-          (picrin library)))