Control over block production and rollbacks in tests

[euonymos]

Is there any testing framework like plutip that allows for control over block production and rollbacks? I think something like this would be very useful:

myTest = do
  submitTx foo
  produceBlock
  point <- currentTip
  submitTx bar
  produceBlock
  assert t1
  rollbackTo point
  assert t2

(courtesy of @t4ccer)

[euonymos]

CLB now has the notion of blocks (though it still lacks the notion of rollbacks), but only as a socket emulator. The pure part still doesn't deal with blocks. Moreover, testing capabilities in Atlas don't provide such an API. So this can't seem to be easy to implement for the time being.