vector-map is no longer used

2014-07-19 18:46:09 +09:00 · 2014-07-19 18:46:09 +09:00 · 3e5fd1a54b
parent f5eb71ed71
commit 3e5fd1a54b
1 changed files with 0 additions and 3 deletions
--- 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)