This will show good progress bar.

Doesn't compile yet.

This is somewhere in Flow.hs in types for ConduitT () a m ()
where m monad is IO.

We don't need the IO monad there, just added a default date for
Duckling to make the parser.

Now the job doesn't return 'succeeded' fields when it actually fails.

This turned out to be quite heavy because of module import cycles.