Haskell implementation of a Ringbuffer inspired by the "Disruptor Pattern"