Fix the BLOCK error type as well as the FS error type

This makes the pretty-printer functions simpler, and we were already
depending on V1.BLOCK in the functor argument anyway.

Note we have duplicated the printer for the BLOCK error here. Perhaps
this should live in mirage-types?

Signed-off-by: David Scott <dave.scott@eu.citrix.com>