aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorGaëtan Gilbert2019-03-11 13:25:39 +0100
committerGaëtan Gilbert2019-03-11 13:25:39 +0100
commit74534f84a782f5de740c52cb97b3ca3a02eb6aa2 (patch)
tree687ef46d8bff6daa1e9106f150e141175a2f9732 /test-suite
parentf72e9df57b6bf600037282dbb257613199cd5b78 (diff)
parent6188c34dd35b9d0f3a8fef6ec2c87a93614cfad8 (diff)
Merge PR #9698: Remove last random failures
Ack-by: SkySkimmer Ack-by: Zimmi48 Reviewed-by: ejgallego
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/output-modulo-time/ltacprof_cutoff.v28
1 files changed, 0 insertions, 28 deletions
diff --git a/test-suite/output-modulo-time/ltacprof_cutoff.v b/test-suite/output-modulo-time/ltacprof_cutoff.v
deleted file mode 100644
index b7c98aa134..0000000000
--- a/test-suite/output-modulo-time/ltacprof_cutoff.v
+++ /dev/null
@@ -1,28 +0,0 @@
-(* -*- coq-prog-args: ("-async-proofs" "off" "-profile-ltac") -*- *)
-Require Coq.ZArith.BinInt.
-Module WithIdTac.
- Ltac sleep := do 50 (idtac; let sleep := (eval vm_compute in Coq.ZArith.BinInt.Z.div_eucl) in idtac).
-
- Ltac foo0 := idtac; sleep.
- Ltac foo1 := sleep; foo0.
- Ltac foo2 := sleep; foo1.
- Goal True.
- foo2.
- Show Ltac Profile CutOff 47.
- constructor.
- Qed.
-End WithIdTac.
-
-Module TestEval.
- Ltac sleep := let sleep := (eval vm_compute in Coq.ZArith.BinInt.Z.div_eucl) in idtac.
-
- Ltac foo0 := idtac; do 50 (idtac; sleep).
- Ltac foo1 := sleep; foo0.
- Ltac foo2 := sleep; foo1.
- Goal True.
- Reset Ltac Profile.
- foo2.
- Show Ltac Profile CutOff 47.
- constructor.
- Qed.
-End TestEval.