elispでqueueもどき

　もしかしたら。
　threadとmutexの組み合わせたらキューっぽいことができるんじゃないだろうか？

( let ((lexical-binding t)
      (w (make-mutex)))
  (mutex-lock w)
  ( loop for x from 1 to  10
        collect
        (make-thread
         ( let ((y x))
           ( lambda()
             ( with-mutex w
               (insert (number-to-string y) " \n"))))))
    (mutex-unlock w))
nil
3 
4 
5 
6 
7 
8 
9 
10 
1 
2 

　処理順序は保証されていないけど、キューっぽいよな、これ。
　うん。