Skip to content

Commit 25de1d1

Browse files
committed
[TC] move time-is-active and coercion-unify in db.v
1 parent ede3b19 commit 25de1d1

File tree

2 files changed

+5
-4
lines changed

2 files changed

+5
-4
lines changed

apps/tc/elpi/tc_aux.elpi

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -174,7 +174,6 @@ namespace tc {
174174
section-var->decl L :-
175175
section-var->decl.aux {coq.env.section} L.
176176

177-
pred time-is-active i:(list string -> prop).
178177
:name "time-is-active"
179178
time-is-active _ :- coq.option.get ["Time", "TC", "Bench"] (coq.option.bool tt), !.
180179
time-is-active Opt :- tc.is-option-active Opt.
@@ -221,9 +220,6 @@ namespace tc {
221220
int ->
222221
term.
223222

224-
:index (5)
225-
pred coercion-unify i:term.
226-
227223
type coercion
228224
term ->
229225
list term ->

apps/tc/theories/db.v

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -102,5 +102,10 @@ Elpi Db tc.db lp:{{
102102

103103
% relates a projection to the its record
104104
pred proj->record i:constant, o:term.
105+
106+
:index (5)
107+
pred coercion-unify i:term.
108+
109+
pred time-is-active i:(list string -> prop).
105110
}
106111
}}.

0 commit comments

Comments
 (0)