'clean' should have type t -> unit

There were some missing format string arguments.