Skip to content

Commit

Permalink
Syntax.Util: remove unused function
Browse files Browse the repository at this point in the history
  • Loading branch information
mtzguido committed Oct 8, 2024
1 parent 53ab508 commit 1d7dfef
Showing 1 changed file with 0 additions and 9 deletions.
9 changes: 0 additions & 9 deletions src/syntax/FStar.Syntax.Util.fst
Original file line number Diff line number Diff line change
Expand Up @@ -951,15 +951,6 @@ let is_fstar_tactics_by_tactic t =
| Tm_fvar fv -> fv_eq_lid fv PC.by_tactic_lid
| _ -> false

let is_builtin_tactic md =
let path = Ident.path_of_lid md in
if List.length(path) > 2 then
match fst (List.splitAt 2 path) with
| ["FStar"; "Tactics"]
| ["FStar"; "Reflection"] -> true
| _ -> false
else false

(********************************************************************************)
(*********************** Constructors of common terms **************************)
(********************************************************************************)
Expand Down

0 comments on commit 1d7dfef

Please sign in to comment.