我应该怎么做才能收听此列表?
(define b '(あ い う え お か き く け こ さ し す せ そ た ち つ て と な に ぬ ね の は ひ ふ
へ ほ ま み む め も や ゆ よ わ を ん ら り る れ ろ にょ びゃ びゅ びょ みゃ みゅ みょ )
(define (foo-play l)
(while (not(null? l)
(play (car l))
(set! l (cdr l)))))
(foo play b)
;play: expects to be at the top level in: (play (car l))
我应该怎么做才能收听此列表?
> あ
(rsound #<s16vector> 0 48971 44100)
...................
> みょ
(rsound #<s16vector> 0 31675 44100)
```
答案 0 :(得分:0)
似乎您需要
(require rsound)
首先。