racket - 我应该怎么做才能听这个列表？

Question

我应该怎么做才能听这个列表？

(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)

```

标签： racket

Answer 1

看来你需要

(require rsound)

首先。