The comment does not match the signature. Also I think it would be better to use a labelled argument, since it is not obvious what [unit -> unit] does.