我应该怎么做才能收听此清单?

时间:2019-07-18 13:33:58

标签: racket

我应该怎么做才能收听此列表?

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

```

1 个答案:

答案 0 :(得分:0)

似乎您需要

(require rsound)

首先。