From 75e394770b534994830f6d80e649734275de5006 Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Sun, 29 Mar 2020 18:02:46 +0200
Subject: Implement a name-based representation for vo files.

See CEP#44 for futher details.
---
 configure.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'configure.ml')

diff --git a/configure.ml b/configure.ml
index 282b40db27..0eff70999d 100644
--- a/configure.ml
+++ b/configure.ml
@@ -1059,6 +1059,7 @@ let write_configml f =
   let pr_s = pr "let %s = %S\n" in
   let pr_b = pr "let %s = %B\n" in
   let pr_i = pr "let %s = %d\n" in
+  let pr_i32 = pr "let %s = %dl\n" in
   let pr_p s o = pr "let %s = %S\n" s
     (match o with Relative s -> s | Absolute s -> s) in
   let pr_li n l = pr "let %s = [%s]\n" n (String.concat ";" (List.map string_of_int l)) in
@@ -1086,7 +1087,7 @@ let write_configml f =
   pr_s "exec_extension" exe;
   pr "let gtk_platform = `%s\n" !idearchdef;
   pr_b "has_natdynlink" hasnatdynlink;
-  pr_i "vo_magic_number" vo_magic;
+  pr_i32 "vo_version" vo_magic;
   pr_i "state_magic_number" state_magic;
   pr_s "browser" browser;
   pr_s "wwwcoq" !prefs.coqwebsite;
-- 
cgit v1.2.3