let
error_analyze_revision s =
"Error while analyzing the following revision info :\n"
^s