aboutsummaryrefslogtreecommitdiffstats
path: root/backend
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2019-05-06 18:54:31 +0200
committerXavier Leroy <xavierleroy@users.noreply.github.com>2019-05-10 14:44:26 +0200
commit1e821bc1f1fb7a6b73ff1468b8b34f61b78cf304 (patch)
treea2d328363060dbf84fc264f9c9a22d5674ae420d /backend
parentdf81fb38c941852919246371840c5fdb003ad0fb (diff)
downloadcompcert-kvx-1e821bc1f1fb7a6b73ff1468b8b34f61b78cf304.tar.gz
compcert-kvx-1e821bc1f1fb7a6b73ff1468b8b34f61b78cf304.zip
Change to AbsInt version string.
The AbsInt build number no longer contains "release", so it must be printed additionally.
Diffstat (limited to 'backend')
-rw-r--r--backend/JsonAST.ml2
-rw-r--r--backend/PrintAsmaux.ml2
2 files changed, 2 insertions, 2 deletions
diff --git a/backend/JsonAST.ml b/backend/JsonAST.ml
index 599c6ecb..4e57106f 100644
--- a/backend/JsonAST.ml
+++ b/backend/JsonAST.ml
@@ -123,7 +123,7 @@ let pp_mnemonics pp mnemonic_names =
let new_line pp () = pp_print_string pp "\n" in
pp_print_list ~pp_sep:new_line pp_print_string pp mnemonic_names
-let jdump_magic_number = "CompCertJDUMP" ^ Version.version
+let jdump_magic_number = "CompCertJDUMPRelease: " ^ Version.version
let pp_ast pp pp_inst ast sourcename =
let get_args () =
diff --git a/backend/PrintAsmaux.ml b/backend/PrintAsmaux.ml
index 6f293bf4..0fd164b0 100644
--- a/backend/PrintAsmaux.ml
+++ b/backend/PrintAsmaux.ml
@@ -289,7 +289,7 @@ let print_inline_asm print_preg oc txt sg args res =
let print_version_and_options oc comment =
let version_string =
if Version.buildnr <> "" && Version.tag <> "" then
- sprintf "%s, Build: %s, Tag: %s" Version.version Version.buildnr Version.tag
+ sprintf "Release: %s, Build: %s, Tag: %s" Version.version Version.buildnr Version.tag
else
Version.version in
fprintf oc "%s File generated by CompCert %s\n" comment version_string;