From 54562510ed05bacdf7c9c2a41bb104a68aeaa1c0 Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Sat, 29 Feb 2020 13:26:08 +0100
Subject: Be robust in calculating visible ids for non-registered constants.

The previous code was only doing that when either in debug or toplevel mode.
Unfortunately, when dealing with open modules the constants might not have
been registered yet, leading to printing failure. I do not see a reason
why this code should fail when used with globals without a user facing name
when the only goal is to compute a set of identifiers that might clash. Thus,
the above failsafe behaviour is now systematic.

Fixes #8206: Module signature error sometimes prints ??.
---
 test-suite/output/bug_8206.out |  5 +++++
 test-suite/output/bug_8206.v   | 11 +++++++++++
 2 files changed, 16 insertions(+)
 create mode 100644 test-suite/output/bug_8206.out
 create mode 100644 test-suite/output/bug_8206.v

(limited to 'test-suite')

diff --git a/test-suite/output/bug_8206.out b/test-suite/output/bug_8206.out
new file mode 100644
index 0000000000..6015fe32f9
--- /dev/null
+++ b/test-suite/output/bug_8206.out
@@ -0,0 +1,5 @@
+File "stdin", line 11, characters 0-23:
+Error: Signature components for label homework do not match: expected type
+"forall a b : nat, bug_8206.M.add a b = bug_8206.M.add b a" but found type
+"nat -> forall b : nat, bug_8206.M.add 0 b = bug_8206.M.add b 0".
+
diff --git a/test-suite/output/bug_8206.v b/test-suite/output/bug_8206.v
new file mode 100644
index 0000000000..8d4e73dfac
--- /dev/null
+++ b/test-suite/output/bug_8206.v
@@ -0,0 +1,11 @@
+Module Type Sig.
+  Parameter add: nat -> nat -> nat.
+  Axiom homework: forall (a b: nat), add a b = add b a.
+End Sig.
+
+Module Impl.
+  Definition add(a b: nat) := plus a b.
+  Axiom homework: forall (a b: nat), add 0 b = add b 0.
+End Impl.
+
+Module M : Sig := Impl.
-- 
cgit v1.2.3