* h_program-lang/errors_code.ml: misc