单线程ok,似乎是monad-par bug