Skip to content

Commit f38a364

Browse files
committed
Fix Alectryon example
1 parent 2a7507f commit f38a364

File tree

2 files changed

+8
-5
lines changed

2 files changed

+8
-5
lines changed

.github/pip-requirements.txt

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
alectryon @ git+https://github.com/cpitclaudel/alectryon@next
1+
alectryon @ git+https://github.com/cpitclaudel/alectryon@a02a99c75c4166efc8812a600e8cbf4588424c0f
22
git+https://github.com/epfl-systemf/SpecMerger
33
requests == 2.32.4
44
beautifulsoup4 == 4.12.3

examples/rocq_proof/Example.v

Lines changed: 7 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -56,17 +56,20 @@ Section AbstractMatching.
5656
Definition compilation_result :=
5757
Semantics.compilePattern regex_of_interest rer.
5858

59-
Lemma compiles_successfully:
59+
Lemma compiles_successfully_refl:
6060
exists m, compilation_result = Result.Success m.
6161
Proof.
6262
(** Again, since the regex is concrete, we can just compute. **)
6363
eexists. cbn. reflexivity.
64+
Qed.
6465

65-
(** But we can also use some theorems from the development, which would work even if the regex was left more abstract. **)
66-
Restart.
66+
(** But we can also use some theorems from the development, which would work even if the regex was left more abstract: **)
6767

68-
Search Semantics.compilePattern Result.Success.
68+
Search Semantics.compilePattern Result.Success.
6969

70+
Lemma compiles_successfully_thm:
71+
exists m, compilation_result = Result.Success m.
72+
Proof.
7073
(** We use the theorem listed in section 4.2.1 in the paper, [compilePattern_success], which states that compilation always succeeds if a regex passes early error checks. **)
7174
apply compilePattern_success.
7275
- (** We have to show that the number of groups per [rer] matches the actual number

0 commit comments

Comments
 (0)