29 |
(map '(vector * 4) #'+ #(1 2 3 4) #(6 6 6 6)) |
(map '(vector * 4) #'+ #(1 2 3 4) #(6 6 6 6)) |
30 |
#(7 8 9 10)) |
#(7 8 9 10)) |
31 |
|
|
32 |
(deftest map-array.7 |
;;; (deftest map-array.7 |
33 |
(map 'array #'identity '(a b c d e f)) |
;;; (map 'array #'identity '(a b c d e f)) |
34 |
#(a b c d e f)) |
;;; #(a b c d e f)) |
35 |
|
|
36 |
(deftest map-array.8 |
;;; (deftest map-array.8 |
37 |
(map 'simple-array #'identity '(a b c d e f)) |
;;; (map 'simple-array #'identity '(a b c d e f)) |
38 |
#(a b c d e f)) |
;;; #(a b c d e f)) |
39 |
|
|
40 |
(deftest map-array.9 |
(deftest map-array.9 |
41 |
(map 'simple-vector #'identity '(a b c d e f)) |
(map 'simple-vector #'identity '(a b c d e f)) |