aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs
diff options
context:
space:
mode:
authorMaxime Dénès2019-05-09 17:05:54 +0200
committerMaxime Dénès2019-05-09 17:05:54 +0200
commit474507d70f967358d993465cf7fc2a9a5e1bbd29 (patch)
treea3ae094cdb789f17159dbdd3743d5e198eb11f6b /test-suite/bugs
parenta424f7aebaf18935ecf9b897db3cd9829010632f (diff)
parent09cdf7b1fad8761cdf7048bf38a468c8558eb0d5 (diff)
Merge PR #10046: [primitive integers] Make div21 implems consistent with its specification
Ack-by: Zimmi48 Ack-by: herbelin Ack-by: maximedenes Ack-by: proux01 Reviewed-by: vbgl
Diffstat (limited to 'test-suite/bugs')
-rw-r--r--test-suite/bugs/closed/bug_10031.v9
1 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/bug_10031.v b/test-suite/bugs/closed/bug_10031.v
new file mode 100644
index 0000000000..15b53de00d
--- /dev/null
+++ b/test-suite/bugs/closed/bug_10031.v
@@ -0,0 +1,9 @@
+Require Import Int63 ZArith.
+
+Open Scope int63_scope.
+
+Goal False.
+cut (let (q, r) := (0, 0) in ([|q|], [|r|]) = (9223372036854775808%Z, 0%Z));
+ [discriminate| ].
+Fail (change (0, 0) with (diveucl_21 1 0 1); apply diveucl_21_spec).
+Abort.