vector-map is no longer used
This commit is contained in:
parent
f5eb71ed71
commit
3e5fd1a54b
|
@ -24,9 +24,6 @@
|
||||||
(go (+ i 1)))))
|
(go (+ i 1)))))
|
||||||
(go 0))
|
(go 0))
|
||||||
|
|
||||||
(define (vector-map proc expr)
|
|
||||||
(list->vector (map proc (vector->list expr))))
|
|
||||||
|
|
||||||
(define (walk proc expr)
|
(define (walk proc expr)
|
||||||
"walk on symbols"
|
"walk on symbols"
|
||||||
(if (null? expr)
|
(if (null? expr)
|
||||||
|
|
Loading…
Reference in New Issue