From 7a2b897f17a1dee0318ce49f59d1b6bc0cbc23b8 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Thu, 4 Sep 2014 18:59:25 +0900
Subject: [PATCH] add scheme/read.scm and scheme/write.scm

---
 piclib/CMakeLists.txt   | 2 ++
 piclib/scheme/read.scm  | 4 ++++
 piclib/scheme/write.scm | 7 +++++++
 3 files changed, 13 insertions(+)
 create mode 100644 piclib/scheme/read.scm
 create mode 100644 piclib/scheme/write.scm

diff --git a/piclib/CMakeLists.txt b/piclib/CMakeLists.txt
index 31fae434..6f79d0fd 100644
--- a/piclib/CMakeLists.txt
+++ b/piclib/CMakeLists.txt
@@ -11,6 +11,8 @@ list(APPEND PICLIB_SCHEME_LIBS
   ${PROJECT_SOURCE_DIR}/piclib/picrin/experimental/lambda.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
diff --git a/piclib/scheme/read.scm b/piclib/scheme/read.scm
new file mode 100644
index 00000000..aca4ec9f
--- /dev/null
+++ b/piclib/scheme/read.scm
@@ -0,0 +1,4 @@
+(define-library (scheme read)
+  (import (picrin base))
+
+  (export read))
diff --git a/piclib/scheme/write.scm b/piclib/scheme/write.scm
new file mode 100644
index 00000000..2e495373
--- /dev/null
+++ b/piclib/scheme/write.scm
@@ -0,0 +1,7 @@
+(define-library (scheme write)
+  (import (picrin base))
+
+  (export write
+          write-simple
+          write-shared
+          display))