Skip to content

Commit

Permalink
clause removal needs unreleased elpi version
Browse files Browse the repository at this point in the history
  • Loading branch information
gares committed Sep 19, 2024
1 parent 9ae1653 commit 63623cf
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/coq_elpi_builtins_synterp.ml
Original file line number Diff line number Diff line change
Expand Up @@ -158,6 +158,7 @@ let accumulate_clauses ~clauses_for_later ~accumulate_to_db ~preprocess_clause ~
let clauses scope =
clauses |> CList.rev_map (fun (name,graft,clause) ->
let vars, clause = preprocess_clause ~depth clause in
let graft = Option.map (function `Remove, _ -> nYI "clause removal" | ((`Replace | `Before | `After), _) as x -> x) graft in
let clause = U.clause_of_term ?name ?graft ~depth loc clause in
(dbname,clause,vars,scope)) in
let local = (options : options).local = Some true in
Expand Down

0 comments on commit 63623cf

Please sign in to comment.