Printf with automatic '\n'

Thanks a lot! (I don’t even dare to tell you how much time I spent trying to implement this).

Is it possible to also exit the program after printing the message?

This makes it exit, but doesn’t print anything:

let fail fmt = Printf.eprintf (fmt ^^ "\n"); exit 1
let () =
  fail "giving up after %d errors" 123

(I’m aware of exit preventing the partial function application here, but don’t know how fix it).