From 3e5fd1a54b21c91e3ba5b3701e3eb6a2a1ce90cc Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Sat, 19 Jul 2014 18:46:09 +0900
Subject: [PATCH] vector-map is no longer used

---
 piclib/picrin/macro.scm | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/piclib/picrin/macro.scm b/piclib/picrin/macro.scm
index b2cccec3..9c3d482e 100644
--- a/piclib/picrin/macro.scm
+++ b/piclib/picrin/macro.scm
@@ -24,9 +24,6 @@
                 (go (+ i 1)))))
     (go 0))
 
-  (define (vector-map proc expr)
-    (list->vector (map proc (vector->list expr))))
-
   (define (walk proc expr)
     "walk on symbols"
     (if (null? expr)