let
error_load_file f s =
Printf
.sprintf
"Error while loading %s: %s"
f s